La función `FileLen` en VBA se utiliza para obtener el tamaño de un archivo en bytes. Esta función es muy útil cuando necesitas conocer el tamaño de un archivo antes de operar con él.

Para usar `FileLen`, simplemente necesitas proveer el camino completo al archivo del cual quieres obtener el tamaño. Aquí tienes un ejemplo de cómo se podría usar:

Sub ObtenerTamanoArchivo()
    Dim rutaArchivo As String
    Dim tamano As Long

    rutaArchivo = "C:miCarpetamiArchivo.txt"
    
    ' Asegúrate de que el archivo exista antes de intentar obtener su tamaño
    If Dir(rutaArchivo) <> "" Then
        tamano = FileLen(rutaArchivo)
        MsgBox "El tamaño del archivo es " & tamano & " bytes."
    Else
        MsgBox "El archivo no existe."
    End If
End Sub

En este ejemplo, `rutaArchivo` debe ser reemplazada con la ruta completa al archivo que deseas examinar. Si el archivo existe, `FileLen` devuelve el tamaño del archivo en bytes. Si el archivo no existe, `Dir` devolverá una cadena vacía `»»`, y el mensaje correspondiente se mostrará al usuario.

Ten en cuenta que `FileLen` puede devolver un tipo de dato `Long`, por lo que es capaz de manejar archivos de hasta 2 GB. Si necesitas trabajar con archivos de más de 2 GB, tendrás que usar APIs de Windows o algún otro método para obtener el tamaño del archivo.

Conoce nuestra tienda

Ver más productos

Mejora tu nivel y logra tus objetivo

Excel

Access

Power BI

Ayúdanos a hacer crecer el proyecto