Contenido
La función `FileDateTime` en VBA se utiliza para obtener la fecha y hora de la última modificación de un archivo. La función devuelve un valor que representa la fecha y hora de la última modificación en formato de fecha/hora de VBA, que se puede utilizar para propósitos de comparación, visualización, o para tomar decisiones basadas en cuándo fue modificado el archivo.
Aquí te dejo un ejemplo sencillo de cómo usar la función `FileDateTime` en VBA:
Sub EjemploFileDateTime()
Dim rutaArchivo As String
Dim fechaHoraModificacion As Date
' Define la ruta completa al archivo
rutaArchivo = "C:miCarpetamiArchivo.txt"
' Comprueba si el archivo existe antes de intentar obtener su fecha de modificación
If Dir(rutaArchivo) <> "" Then
' Obtiene la fecha y hora de última modificación del archivo
fechaHoraModificacion = FileDateTime(rutaArchivo)
' Imprime la fecha y hora de modificación en la Ventana Inmediato
Debug.Print "El archivo fue modificado por última vez en: " & fechaHoraModificacion
Else
Debug.Print "El archivo no existe."
End If
End Sub
En este ejemplo, se supone que tienes un archivo llamado `miArchivo.txt` en `C:miCarpeta`. La macro comienza por definir la ruta del archivo y luego verifica si el archivo existe usando la función `Dir`. Si el archivo existe, se utiliza `FileDateTime` para obtener la fecha y hora de la última modificación y se imprime en la Ventana Inmediato. Si el archivo no existe, se imprime un mensaje indicando que el archivo no existe.
Es importante notar que la función `FileDateTime` solo funciona si el archivo existe en la ruta especificada; de lo contrario, puede generar un error. Además, dependiendo de los ajustes de seguridad del sistema operativo o de los atributos del archivo, es posible que la función no pueda acceder a la información de algunos archivos y puede devolver un error.
Conoce nuestra tienda
Ver más productos
Mejora tu nivel y logra tus objetivo
Excel
Access
Power BI
