View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Kev Kev is offline
external usenet poster
 
Posts: 46
Default Menu gone, what am I doing wrong?

Hi once again,
This code works good save for one problem. When I exit Excel, my menu's
don't return.
As you see I have tried both the "Deactivate" and the "Close" events but I'm
missing something. (All of these are in the workbook part).

Private Sub workbook_open()

Sheets("Sign").Select

End Sub

Private Sub Workbook_Activate()
Application.CommandBars("Worksheet Menu Bar").Enabled = False
End Sub
Private Sub Workbook_Deactivate()
Application.CommandBars("Worksheet Menu Bar").Enabled = True
End Sub
Private Sub Workbook_Close()
Application.CommandBars("Worksheet Menu Bar").Enabled = True
End Sub
--

Thanks
....Kev...
....kev...