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

You need to place this code in your workbooks event :

Private Sub Workbook_Activate()
   'Hide ribbon and formula when workbook is activated
    Application.DisplayFormulaBar = False
    ActiveWindow.DisplayHeadings = False
    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",false)"
End Sub

Private Sub Workbook_Deactivate()
   'Show ribbon and formula when workbook is deactivated
    Application.DisplayFormulaBar = True
    ActiveWindow.DisplayHeadings = True
    Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",true)"
End Sub

Use the Workbook Activate / Deactivate events:

Private Sub Workbook_Activate()
Call hideribbon
End Sub

Private Sub Workbook_Deactivate()
Call showribbon
End Sub

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

Sub showribbon()
Application.DisplayFormulaBar = True
ActiveWindow.DisplayHeadings = True
Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",true)"
End Sub

Oh, and please put your code in CODE tags...