Toggle Button 'State' Problem on Workbook Open

I have a Workbook that, when opened, hides the 'Status Bar', the 'Formula Bar' and the 'Worksheet Tabs' and resets them when the workbook is closed.

Please Login or Register  to view this content.

On Sheet1, I have a Shape (Rounded Rectangle) which I'm using as a toggle button.

The button starts by saying 'Show'. When the user clicks on the button, the macro below, shows the formula bar, the status bar and the worksheet tabs and the button text changes to 'Hide'. So far, so good.

If the user now saves the worksheet, closes it and then re opens it, the toggle button still say's 'Hide' because this is the how it was left when the user saved and closed the workbook, however, because the workbook is set to open fullscreen, the button actually needs to say 'Show', when the workbook is opened?

How can I ensure that when the workbook is opened, the button text will always say 'Show' by default, irrespective of what it said when the user saved and closed the workbook?

Please Login or Register  to view this content.

I've attached a simple sample to demonstrate.

Steffan,

Many thanks for all your help, your code is working perfectly now that I realsied how to add the activate and deactivate correctly and this latest addition solves my button text problem as well...

Your help is greatly appreciated...