Bonjour Alex et le forum,
Une possibilité serait d'ajouter le code suivant dans "ThisWorkbook" :
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Worksheets("Feuil1").Range("A1") = Date
End Sub
Dans cet exemple, lors de chaque enregistrement du classeur, la cellule A1 de la feuille "Feuil1" est mise à jour automatiquement avec la date du jour (donc avec la date d'enregistrement).
Slts
wally