I need a function that will dynamically calculate the current workbook's size
(either in KB of MB) and display it. I wrote the following wrapper function:

Public Function FileSize() As Long

FileSize = FileLen(ActiveWorkbook.Path & "\" & ActiveWorkbook.Name)

End Function

It works, except that if you add or remove any data, you have to save,
close, and re-open the file for the new size to display. Are there any
options that will show the file size after it is saved?

Thanks.

--
Hmm...they have the Internet on COMPUTERS now!