Get menu back when totally gone

Hi,

I have a problem when I open excel, I only see the row and column headers and the cells. No menus and no toolbars. I know how to add or remove these when they are there, but I can't do that now. What do I do?

Thanks very much,

Adam
adamcwebb@yahoo.com

PS I can send you a file of what it looks like if need be.

 

[ivymike]

wow, that's impressive - you got rid of the worksheet menu bar too? (the one that says file, edit, view, insert, etc)I can't seem to make that one go away no matter what I do.

Nonetheless, I made a spreadsheet with a single button on it called "show me the toolbars!" Clicking the button should make all the toolbars visible. The code is shown below (I'll email you the ss):

Private Sub CommandButton1_Click()
Dim MyBar
For Each MyBar In Toolbars
MyBar.Visible = True
Next
End Sub

 

[ivymike]

if that doesn't work, try this:

Sub test()
Application.CommandBars("Worksheet Menu Bar&quot.Visible = True
End Sub

 

[par060]

try useing alt-v..this will bring up the view menu..from there you can select toolbars and display what ever toolbars you chose

 

Thanks for everyone's help.

Ivymike won this contest. The final code that ended up solving the problem was:

Sub test()
CommandBars("Worksheet Menu Bar&quot.Enabled = True
CommandBars("Worksheet Menu Bar&quot.Visible = True
End Sub

I guess you could use the reverse of the first line to get rid of the menu bar too. Thanks par060, but I tried alt+v, alt+f but none of them worked. The menu bar wasn't there at ALL.

Cheers,

Adam.