Trabajar con un objeto OSF (objet sistem file),
Dim osf As Object
Dim fichero as file
Dim fecha as string
Set osf = CreateObject("Scripting.FileSystemObject")
Set fichero = osf.getfile(ruta_de_acceso)
fecha = "la fecha es " & and fichero.DateLastModified
msgbox fecha
Nota :
DateLastModified = ultima ves que fue modificado
DateCreated = cuando fue creado.
