Show ribbon when switching workbooks

hi,

I have a workbook that hides the ribbon, formula bar, etc on opening. What I would like to do is show all the hidden aspects when switching to another workbook, but when I go back to my workbook it hides everything again.

My code to hide is:

Sub hideribbon()
Application.DisplayFormulaBar = False
ActiveWindow.DisplayHeadings = False
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",false)"
End Sub

thanks,
dan

Moderator's note: Please take the time to review our rules. There aren't many, and they are all important. See rule #3. I have added code tags because you are still a new user. --6StringJazzer