VBA/Excel/Access/Word/File Path/FileLen

Determining a file size: displays the size, in bytes, of the Excel executable file. It finds this value by using the FileLen function.

   <source lang="vb">

Sub GetFileSize()

   Dim TheFile As String
   TheFile = "c:\MSOFFICE\EXCEL\EXCEL.EXE"
   MsgBox FileLen(TheFile)

End Sub

</source>