Excel macro date derniere modification du doc

Merci bcp!

Bonjour,
J'aarive pas à utiliser ce code, ça me marque erreur... et g n'obtiens rien..
Faut il mettre toutes ces "Sub" comme ci dessous?
Dim modif As Boolean

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If modif = True Then
Sheets("Feuil1").Range("A1").Value = "Dernière Révision le " & Format(Date, "dd/mm/yyyy")
End If
End Sub

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
modif = True
End Sub

Salut Steph,

Je ne sais pas si tu as trouvé la solution mais pour rajouter l'heure voici la solution :

il te suffit de rajouter la partie en gras et soulignée à la partie suivante du code indiqué plus haut :

Private Sub Workbook_BeforeClose(Cancel As Boolean)
If modif = True Then
Sheets("Feuil1").Range("A1").Value = "Dernière Révision le " & Format(Date, "dd/mm/yyyy") & Format(Time, " hh/mm")
End If
End Sub

Voilà, en espérant avoir pu t'aider.

Salutations.

P.S. fais attention, entre " et hh/mm il y a un espace afin de créer un espace entre la date et l'heure à l'affichage dans la cellule.

Je voudrais savoir quelle est la procédure pour inscrire ce code visual basic?
Ce code m'intéresse beaucoup mais impossible de l'utiliser
Merci d'avance