FileDateTime = quel résultat ?

Bonjour,

j'ai une question au sujet de l'instruction FileDateTime qui me donne la date d'ouverture et non pas la date de création ou modification du fichier, ci dessous un extrait de la macro :

j'ouvre le fichier, puis je cherche sa date (j'ai besoin de connaitre sa date pour savoir si je vais copier les données de ce fichier dans un autre fichier récapitulatif)

chemin = Workbooks(archiv).Sheets(1).Range("A12").Value

Workbooks.Open Filename:=chemin

Workbooks(archiv).Sheets(1).Range("A13").Value = FileDateTime(chemin)

résultat dans la cellule A13 : 11/09/2018 08:55:20 c'est à dire quand j'ai effectué la macro

j'ai aussi essayé :

Set fs = CreateObject("Scripting.FileSystemObject")

Set f = fs.GetFile(chemin)

Workbooks(archiv).Sheets(1).Range("A14").Value = f.DateLastModified

mais j'obtiens exactement le même résultat, je me demande s'il faut laisser le fichier fermé pour avoir sa date ?

merci beaucoup pour votre aide

Bonjour,

Essaie ceci :

    'Date heure création
    MsgBox ActiveWorkbook.BuiltinDocumentProperties(11)
    'Date heure dernier enregistrement
    MsgBox ActiveWorkbook.BuiltinDocumentProperties(12)

merci beaucoup ça fonctionne, entre temps j'ai fait la manip suivante :

' je trouve le chemin du fichier

chemin = Application.GetOpenFilename

' je détermine sa date

MsgBox FileDateTime(chemin)

' c'est bien la date de dernière modif

' seulement après je l'ouvre

Workbooks.Open Filename:=chemin