VBA FileLen Function

VBA FileLen Function in Excel

VBA FileLen function in Excel is categorized as File and Directory function. This built-in VBA FileLen statement returns the size or length of a file in bytes in Excel VBA.

This function can be used in either procedure or function in a VBA editor window in Excel. We can use this VBA FileLen Function in any number of times in any number of procedures or functions. In the following section we learn what is the syntax and parameters of the FileLen function, where we can use this FileLen Function and real-time examples in Excel VBA.

Syntax of VBA FileLen Function

The syntax of the FileLen Function in VBA is

FileLen(PathName)

The FileLen Function returns a numeric value in bytes.

Parameters or Arguments:

The FileLen function/statement has one argument in Excel VBA.
where PathName It is a mandatory string type parameter. The PathName argument represents the path of a file.

Where we can apply or use VBA FileLen Function?

We can use this FileLen Function in VBA MS Office 365, MS Excel 2016, MS Excel 2013, 2011, Excel 2010, Excel 2007, Excel 2003, Excel 2016 for Mac, Excel 2011 for Mac, Excel Online, Excel for iPhone, Excel for iPad, Excel for Android tablets and Excel for Android Mobiles.

Example 1: Find the Length of specified file

Here is a simple example of the VBA FileLen function. This below example finds length of the specified file. It returns a value in bytes.

'Find the Length of File
Sub VBA_FileLen_Function_Ex1()
    
    Dim sFilePath As String
    Dim dOutput As Long
    
    sFilePath = "C:\Someswari\VBAF1\VBA Functions\VBA Text Functions\VBA Function Example File.xlsm"
    
    dOutput = FileLen(sFilePath)
    
    MsgBox "Length of the File : " & dOutput & " Bytes", vbInformation, "VBA FileLen Function"
   
End Sub

Output: Here is the screen shot of the first example output.
VBA FileLen Function

Example 2: ‘Find the Length of File(Returns an Error)

Here is a simple example of the VBA FileLen function. This below example returns an error. Because, the specified file is not available.


'Find the Length of File
Sub VBA_FileLen_Function_Ex2()
    
    Dim sFilePath As String
    Dim dOutput As Long
    
    'Note: This file is not available
    sFilePath = "C:\VBAF1\VBA Functions\VBA Text Functions\VBA Function Example File.xlsm"
    
    dOutput = FileLen(sFilePath)
    
    MsgBox "Length of the File : " & dOutput & " Bytes", vbInformation, "VBA FileLen Function"
   
End Sub

Output: Here is the screen shot of the second example output.
VBA FileLen Function

Instructions to Run VBA Macro Code or Procedure:

You can refer the following link for the step by step instructions.

Instructions to run VBA Macro Code

Other Useful Resources:

Click on the following links of the useful resources. These helps to learn and gain more knowledge.

VBA Tutorial VBA Functions List VBA Arrays in Excel Blog

VBA Editor Keyboard Shortcut Keys List VBA Interview Questions & Answers

Leave a Reply