recording excel file size in a variable 1

[sahmiele]

I am in Excel, and would like to record the active file size into a a variable. I can't seem to find the code to do this. Any suggestions?

 

[CautionMP]

sahmiele,
[tt]FileLen(ActiveWorkbook.Path & "\" & ActiveWorkbook.Name)[/tt]

Hope this helps,
CMP

[small]For the best results do what I'm thinking, not what I'm saying.[/small]
(GMT-07:00) Mountain Time (US & Canada)

 

[sahmiele]

awesome, thanks. Also, is there a simple way to do the same thing with a folder if I have the path name?

 

[CautionMP]

sahmiele,
On the first post you can use [tt]ActiveWorkbook.FullName[/tt] instead of concatenating the [tt]Path[/tt] and [tt]Name[/tt].

For Folder inforamtion I beleive the only way to get that is to use the [tt]FileSystemObject[/tt].

Function ThisWorkbookFolderSize() As Long
Dim objFSO As Object
Set objFSO = CreateObject("Scripting.FileSystemObject")
'This will cause an error if the workbook is not saved
Set objFSO = objFSO.GetFolder(ThisWorkbook.Path)
ThisWorkbookFolderSize = objFSO.Size
Set objFSO = Nothing
End Function

Hope this helps,
CMP

[small]For the best results do what I'm thinking, not what I'm saying.[/small]
(GMT-07:00) Mountain Time (US & Canada)