Cómo comprobar la marca de tiempo de un archivo de texto usando VBA

Question

Estoy intentando escribir un código en Excel 2003 VBA (Windows XP) para averiguar si el archivo TXT externo tiene una marca de tiempo diferente, así que puedo 'importarlo' si cambió .

¿Hay alguna función en VBA que pueda salvarme?

Answer 1

Creo que quieres la fecha de modificación. Si es así, vea esto

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

El formato de fecha y hora que se muestra se basa en la configuración regional de su sistema.

Editar

Usando 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