Bonjour le fil
Comme je l'ai proposé, je ne sais plus quand, cette macro dans le fichier concerné, enregistre tous les acces au fichier dans un fichier texte, date, heure, nom PC, nom ordinateur.
Le fichier texte doit être nommé log.txt
En ce qui concerne les modifs du classeur, les suivis de modifs, comme expliqué par plusieurs posts sont redoutables.
Private Sub Workbook_Open()
Dim FileNum As Long
FileNum = FreeFile
Open ThisWorkbook.Path & '\\log.txt' For Append As #FileNum
Print #FileNum, ThisWorkbook.FullName & ' OPENED: ' & _
Format(Now, 'yyyy-mm-dd hh:mm:ss') & ' User: ' & _
Application.UserName & ' from computer: ' & Application.OrganizationName
Close #FileNum
End Sub