Bonjour,
Je viens seulement de consulter ton message (et oui WE de paques oblige) :
Je ferais plutôt une procédure avant la fermeture du fichier, qui par exemple copierait la date et l'heure dans une cellule :
Private Sub Workbook_BeforeClose(Cancel As Boolean)
range("a1")=now()
End Sub
Tu as donc dans la cellule a1 la date de la dernière utilisation du fichier.
J'espère que ça te convient