TheFIDDLER
Jul 13th, 2004, 04:06 PM
I have a subroutine which has the following:
Public Sub ViewMenus()
Dim Bar As CommandBar
CommandBars("Worksheet Menu Bar").Enabled = True
Application.DisplayFormulaBar = True
For Each Bar In Application.CommandBars
Bar.Enabled = True
Next Bar
CommandBars("Standard").Visible = True
CommandBars("Formatting").Visible = True
Application.CommandBars("Toolbar List").Enabled = True
End Sub
Which I can call from anywhere. Works very well.
However, I am trying to call it from my BeforeClose Event, and the Command Bars aren't coming back. Any one know why this would be. I am trying to restore the Excel View to what it was prior to hidding all these bars.
Public Sub ViewMenus()
Dim Bar As CommandBar
CommandBars("Worksheet Menu Bar").Enabled = True
Application.DisplayFormulaBar = True
For Each Bar In Application.CommandBars
Bar.Enabled = True
Next Bar
CommandBars("Standard").Visible = True
CommandBars("Formatting").Visible = True
Application.CommandBars("Toolbar List").Enabled = True
End Sub
Which I can call from anywhere. Works very well.
However, I am trying to call it from my BeforeClose Event, and the Command Bars aren't coming back. Any one know why this would be. I am trying to restore the Excel View to what it was prior to hidding all these bars.