Before Close - Restore All Menus Xl97

I have a subroutine which has the following:

VB Code:

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.