OVH Cloud OVH Cloud

Inscrire la date et l'heure lorsque clique sur enrégistrer

27 réponses
Avatar
Aiwa
Bonjour, j'aimerais savoir comment faire pour que dans une cellule ca inscrit
la date et l'heure quand je clique sur enrégistrer, comme ca je vais savoir
quand j'ai fait la mise à jour de mon fichier, C'est tu possible sans VBA ?

Merci beaucoup à l'avance

10 réponses

1 2 3
Avatar
anonymousA
bonjour,

sans utiliser VBA, je ne vois pas. Avec VBA, mettre dans le module
Thisworkbook la procédure Workbook_Beforesave

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)

Cells(1, 1).Value = Now

End Sub

si tu veux le mettre dans la cellule A1

Cordialement,


Bonjour, j'aimerais savoir comment faire pour que dans une cellule ca inscrit
la date et l'heure quand je clique sur enrégistrer, comme ca je vais savoir
quand j'ai fait la mise à jour de mon fichier, C'est tu possible sans VBA ?

Merci beaucoup à l'avance


Avatar
jps
ou bien encore cela, à adapter :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'B1 étant la cellule où le texte s'inscrit
Range("B1") = "Dernière mise à jour le " & Format(Date, _
"dd/mm/yyyy")
End Sub

jps

"anonymousA" a écrit dans le message
de news:
bonjour,

sans utiliser VBA, je ne vois pas. Avec VBA, mettre dans le module
Thisworkbook la procédure Workbook_Beforesave

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)


Cells(1, 1).Value = Now

End Sub

si tu veux le mettre dans la cellule A1

Cordialement,


Bonjour, j'aimerais savoir comment faire pour que dans une cellule ca
inscrit


la date et l'heure quand je clique sur enrégistrer, comme ca je vais
savoir


quand j'ai fait la mise à jour de mon fichier, C'est tu possible sans
VBA ?



Merci beaucoup à l'avance




Avatar
Aiwa
Merci à vous deux


ou bien encore cela, à adapter :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
'B1 étant la cellule où le texte s'inscrit
Range("B1") = "Dernière mise à jour le " & Format(Date, _
"dd/mm/yyyy")
End Sub

jps

"anonymousA" a écrit dans le message
de news:
bonjour,

sans utiliser VBA, je ne vois pas. Avec VBA, mettre dans le module
Thisworkbook la procédure Workbook_Beforesave

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)


Cells(1, 1).Value = Now

End Sub

si tu veux le mettre dans la cellule A1

Cordialement,


Bonjour, j'aimerais savoir comment faire pour que dans une cellule ca
inscrit


la date et l'heure quand je clique sur enrégistrer, comme ca je vais
savoir


quand j'ai fait la mise à jour de mon fichier, C'est tu possible sans
VBA ?



Merci beaucoup à l'avance








Avatar
Paul V.
Bonjour,

En introduisant la formule
=maintenant()
dans une cellule, tu auras l'affichage de la date et de l'heure.
Cet affichage se changera à chaque introduction donc donnera la date et
l'heure de ton dernier changement.

Quand tu enregistreras ton fichier, les propiétés du fichier te donnent la
date et l'heure de l'enregistrement et la cellule avec la formule la date et
l'heure du dernier changement.

Ouala

A+
Paul V de passage qui salue tous ses potes du coin et du COIN.

"Aiwa" a écrit dans le message de news:

Bonjour, j'aimerais savoir comment faire pour que dans une cellule ca
inscrit
la date et l'heure quand je clique sur enrégistrer, comme ca je vais
savoir
quand j'ai fait la mise à jour de mon fichier, C'est tu possible sans VBA
?

Merci beaucoup à l'avance


Avatar
jps
salut aussi tatoi, ô paul V imperator belgorum....(dont jacquouille te dira
combien bravi sunt)
au 11 nivôse (au hasard)
jps

"Paul V." a écrit dans le message de
news:
Paul V de passage qui salue tous ses potes du coin et du COIN.


Avatar
Paul V.
Resalutatoi,

AMHA, je pencherais pour Frimaire et surement pas le 11 mais au environ du
20 ;-)

Cela m'empechera pas d'y être au bon moment

A+

Paul
"jps" a écrit dans le message de
news:
salut aussi tatoi, ô paul V imperator belgorum....(dont jacquouille te
dira
combien bravi sunt)
au 11 nivôse (au hasard)
jps

"Paul V." a écrit dans le message de
news:
Paul V de passage qui salue tous ses potes du coin et du COIN.





Avatar
Aiwa
Rebonjour un autre petite chose comment mettre la date sur une feuille en
particulier ex: nom de la feuille = Aide-Mémoire , pcq si je suis sur une
autre feuille et je quitte ou sauve ca l'affiche sur celle en cour et non
celle Aide-Mémoire. Svp me dire quoi ajouter pour les 2 VBA ci-bas, j'aurais
aimer que la date soit inscrit ainsi
ex: 3 déc 2004 12h15, faut il le mettre dans la macro ou format de la
cellule. Merci encore à l'avance

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Cells(1, 4).Value = Now
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Range("D1") = "Dernière mise à jour le " & Format(Date, _
"dd/mm/yyyy")
End Sub






Resalutatoi,

AMHA, je pencherais pour Frimaire et surement pas le 11 mais au environ du
20 ;-)

Cela m'empechera pas d'y être au bon moment

A+

Paul
"jps" a écrit dans le message de
news:
salut aussi tatoi, ô paul V imperator belgorum....(dont jacquouille te
dira
combien bravi sunt)
au 11 nivôse (au hasard)
jps

"Paul V." a écrit dans le message de
news:
Paul V de passage qui salue tous ses potes du coin et du COIN.










Avatar
jps
pardon aiwa, l'apéro s'est prolongé...
pour répondre à ta question, il te suffit d'écrire

Sheets("AideMemoire").Range("D1") = Dernière mise.....etc....

capich?
jps

"Aiwa" a écrit dans le message de
news:
Rebonjour un autre petite chose comment mettre la date sur une feuille en
particulier ex: nom de la feuille = Aide-Mémoire , pcq si je suis sur une
autre feuille et je quitte ou sauve ca l'affiche sur celle en cour et non
celle Aide-Mémoire. Svp me dire quoi ajouter pour les 2 VBA ci-bas,
j'aurais

aimer que la date soit inscrit ainsi
ex: 3 déc 2004 12h15, faut il le mettre dans la macro ou format de la
cellule. Merci encore à l'avance

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)

Cells(1, 4).Value = Now
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Range("D1") = "Dernière mise à jour le " & Format(Date, _
"dd/mm/yyyy")
End Sub






Resalutatoi,

AMHA, je pencherais pour Frimaire et surement pas le 11 mais au environ
du


20 ;-)

Cela m'empechera pas d'y être au bon moment

A+

Paul
"jps" a écrit dans le message de
news:
salut aussi tatoi, ô paul V imperator belgorum....(dont jacquouille te
dira
combien bravi sunt)
au 11 nivôse (au hasard)
jps

"Paul V." a écrit dans le message de
news:
Paul V de passage qui salue tous ses potes du coin et du COIN.












Avatar
Aiwa
Tu est pardonner :) je doit avoir mal écrit car il y a un boque

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Sheets("Aide Memoire").Range("D1") = "Mise à jour le " & Format(Date,
"dd/mmmm/yyyy")
End Sub


pardon aiwa, l'apéro s'est prolongé...
pour répondre à ta question, il te suffit d'écrire

Sheets("AideMemoire").Range("D1") = Dernière mise.....etc....

capich?
jps

"Aiwa" a écrit dans le message de
news:
Rebonjour un autre petite chose comment mettre la date sur une feuille en
particulier ex: nom de la feuille = Aide-Mémoire , pcq si je suis sur une
autre feuille et je quitte ou sauve ca l'affiche sur celle en cour et non
celle Aide-Mémoire. Svp me dire quoi ajouter pour les 2 VBA ci-bas,
j'aurais

aimer que la date soit inscrit ainsi
ex: 3 déc 2004 12h15, faut il le mettre dans la macro ou format de la
cellule. Merci encore à l'avance

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As
Boolean)

Cells(1, 4).Value = Now
End Sub

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Range("D1") = "Dernière mise à jour le " & Format(Date, _
"dd/mm/yyyy")
End Sub






Resalutatoi,

AMHA, je pencherais pour Frimaire et surement pas le 11 mais au environ
du


20 ;-)

Cela m'empechera pas d'y être au bon moment

A+

Paul
"jps" a écrit dans le message de
news:
salut aussi tatoi, ô paul V imperator belgorum....(dont jacquouille te
dira
combien bravi sunt)
au 11 nivôse (au hasard)
jps

"Paul V." a écrit dans le message de
news:
Paul V de passage qui salue tous ses potes du coin et du COIN.
















Avatar
Dédé
Salut Aiwa !

Si tu veux pas le faire avec VBA, essaie de faire cela :
CTRL + Shift + :
CTRL + Shift + ;

Un pour l'heure et l'autre pour la date ...

Autrement, plus rapide pour insérer l'heure dans une cellule sans passer par
VBA, ben sais pas trop ...

Salutations
Dédé
"Aiwa" a écrit dans le message de
news:
Bonjour, j'aimerais savoir comment faire pour que dans une cellule ca
inscrit

la date et l'heure quand je clique sur enrégistrer, comme ca je vais
savoir

quand j'ai fait la mise à jour de mon fichier, C'est tu possible sans VBA
?


Merci beaucoup à l'avance


1 2 3