date du jour si modif de la feuille

[saint_marc]

bonjour a tous
merci d'avance de vos compétences
je voudrais afficher ou modifier la date existante dans une cellule la date du jour si j'ai modifié une feuille excel
merci

 

[JCGL]

Re : date du jour si modif de la feuille

Bonjour à tous,

Peux-tu essayer avec :

=AUJOURDHUI()

A+ à tous

 

[eriiic]

Re : date du jour si modif de la feuille

Bonjour à tous,

et si tu veux que ta date ne change pas le lendemain :
Ctrl+; dans la cellule
ou bien en vba...

Private Sub Worksheet_Change(ByVal Target As Range)
    [A1] = Now
End Sub

qui t'inscrit date-heure de la dernière saisie.

eric

 

[lenfos]

Re : date du jour si modif de la feuille

Je crois que Ctrl+; ne fonctionne pas sur la version française d'excel. Si c'est le cas, tu peux utiliser un programme externe, on peut le faire avec un script autohotkey : Script AutoHotKey : ajout date/heure.

 

[JCGL]

Re : date du jour si modif de la feuille

Bonjour à tous,

Je crois que Ctrl+; ne fonctionne pas sur la version française d'excel.

Erreur ce raccourci fonctionne sur XL FR.

A+ à tous

 

[saint_marc]

Re : date du jour si modif de la feuille

comment je l'ecris?
sous forme de macro?
merci de ton indulgence pour un debutant

 

[eriiic]

Re : date du jour si modif de la feuille

Re,

clic-droit sur le nom d'onglet de la feuille concernée, choisir 'visualiser le code...'
Coller les code depuis Sub jusqu'à End Sub
Enregistrer sous Type *.xlsm si tu as excel 2007 ou supérieur.

eric

 

[saint_marc]

Re : date du jour si modif de la feuille

Merci beaucoup
a+ pour d'autres problemes
saint marc

 

[saint_marc]

Re : date du jour si modif de la feuille

bonjour
probleme a la solution d'eric
ca marche mais apres j'ai le message probleme de pile et quand je quitte excel celui ci se met en boucle et je suis obligé d' eteindre avec le ges de taches
svp c'etait trop top
saint marc

 

[eriiic]

Re : date du jour si modif de la feuille

Bonjour,

petit oubli de ma part, désolé.

Private Sub Worksheet_Change(ByVal Target As Range)
    Application.EnableEvents = False
    [A1] = Now
    Application.EnableEvents = True
End Sub

eric

 

[job75]

Re : date du jour si modif de la feuille

Bonjour à tous,

Ou aussi :

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then [A1] = Now
End Sub

Bien sûr si l'on efface A1 rien ne se passera...

A+

 

[saint_marc]

Re : date du jour si modif de la feuille

Merci a eric et job75
a+