C'est tout simple, en fin de compte.
A placer dans thisworkbook --> workbook
Private Sub Workbook_Open()
Range("A1") = Range("A1") + 1
End Sub
ainsi à chaque ouverture de votre fichier une valeur +1 sera rajouté, comme celà vous pourrai surveiller l'utilisation de vos fichiers (collègues, patron...)
EXCELLEMENT VOTRE. SYL'S