date du jour si modif de la feuille

saint_marc

XLDnaute Nouveau
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
 

eriiic

XLDnaute Barbatruc
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...
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
    [A1] = Now
End Sub
qui t'inscrit date-heure de la dernière saisie.

eric
 
Dernière édition:

eriiic

XLDnaute Barbatruc
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

XLDnaute Nouveau
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

XLDnaute Barbatruc
Re : date du jour si modif de la feuille

Bonjour,

petit oubli de ma part, désolé.
Code:
Private Sub Worksheet_Change(ByVal Target As Range)
    Application.EnableEvents = False
    [A1] = Now
    Application.EnableEvents = True
End Sub
eric
 

job75

XLDnaute Barbatruc
Re : date du jour si modif de la feuille

Bonjour à tous,

Ou aussi :

Code:
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+
 

Statistiques des forums

Discussions
288 664
Messages
1 893 836
Membres
170 100
dernier inscrit
El Chino Loco
Haut Bas