VBA - derniere fois qu un fichier a ete modifié

[Greg]

Bonjour tout le monde,

Je cherche a extraire la date et heure et minute a laquelle un fichier a ete modifié.
Est ce possible de faire cela en VBA ? Quelle fonction utliser ?

Merci d'avance pour votre aide,

Greg

 

[Jam]

Salut Greg,

Ceci est réalisable via un objet script. le code:

Sub Test()
    Set fs = CreateObject('Scripting.FileSystemObject')
    Set f = fs.GetFile(ActiveWorkbook.Path & '\\' & ActiveWorkbook.Name)
    sLMD = Left(f.DateLastModified, 8)
    Debug.? 'Last Modified: ' & sLMD
End Sub

Bon courage

 

[Jam]

Re,

Tu peux jeter un coup d'oeil dans l'aide d'Excel à DocumentProperty ou encore ActiveWorkbook.BuiltinDocumentProperties.

Bonne soirée

 

[Greg]

Merci pour votre aide.

Cordialement,

Greg