Always show file size

[nate11000]

Hi,

I'm trying to figure out how to display a regularly updated file size on the user interface in Excel 2007. I'm trying to avoid a msgbox popup or similar user interaction.

I've tried the using the status bar via application.statusbar=size, but it seems like you have to give up the normal status bar functionality to do that.

Is there a way to keep the normal status bar functionality and just tack on my own string, or are there any other ideas out there for displaying regularly updated information without getting in the way?


Thanks for your help!

[stanleydgromjr]

nate11000,

Try:
Excel 2007: Watch Window Feature!
http://www.msoffice-tutorial-trainin...ch-window.html

[Leith Ross]

Hello nate11000,

You could use a UserForm with a Label. Adjust the UserFrom to fit around the Label. Make the UserForm non-modal by setting UserForm.ShowModal = False. The code below will remove the close "X" on the UserForm. This way it is constantly displayed and can be updated through code and not closed by the user.

Remove Close "X" from Window

Please Login or Register  to view this content.

UserForm Code Needed

Please Login or Register  to view this content.

[nate11000]

Thanks, Leith.

I was really hoping for something more integrated into the normal interface, but it doesn't seem like that's possible.

I'll give the userform idea a go and see how it does. Thanks again for your help!

[Leith Ross]

Hello Nathan,

Please include links to other sites where you have post the same or similar question.

Cross posted here: http://www.thecodecage.com/forumz/ex...el-2007-a.html

[Andy Pope]

Should be possible with an addin, .xlam, using code and some ribbonX.

[Andy Pope]

Here is an example. Adds a group to the Home tab which displays the file size of the active workbook.

VBA code

Please Login or Register  to view this content.

Class CAppEvt code

Please Login or Register  to view this content.

Ribbon XML

Please Login or Register  to view this content.

[jonsanderson5]

Wow, Andy, you are a genius! Thanks for killing my confidence and pride in my skills!