VBA sur la date derniere modification

Bonjour,

Tout d'abord, je tiens à préciser que je ne maîtrise pas parfaitement le langage VBA et les macros.

Voici mon soucis

J'ai un tableau de plusieurs pages ou je dois tracer qui à modifier et quand, sur la formule que j'utilises, il n'est mentionné que la dernière modification, et il manque l'info de l'utilisateur

Pouvez-vous m'aider ?

Dim modif As Boolean

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

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