Come controllare il timestamp di un file di testo usando VBA

Question

Sto provando a scrivere un codice in Excel 2003 VBA (Windows XP) per scoprire se il file TXT esterno ha un diverso timestamp, quindi posso "importarlo" se è cambiato .

C'è qualche funzione in VBA che può salvarmi?

Answer 1

Penso che vogliate la data di modifica. Se sì, vedi questo

Debug.Print FileDateTime("C:\Sample.txt") 

Il formato della data e dell'ora visualizzate si basa sulle impostazioni locali del sistema.

Modifica

Utilizzando FileSystemObject

Option Explicit 

Sub Sample() 
    Dim oFS As Object 
    Dim sFile As String 

    sFile = "C:\MyFile.txt" 

    Set oFS = CreateObject("Scripting.FileSystemObject") 

    '~~> Created Date 
    Debug.Print "Created Date : "; oFS.GetFile(sFile).DateCreated 

    '~~> Modified Date 
    Debug.Print "Modified Date : "; oFS.GetFile(sFile).Datelastmodified 

    Set oFS = Nothing 
End Sub