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.

Ejemplo

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

    rutaArchivo = "C:\miCarpeta\miArchivo.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