Missing Menu Bar

[Rainbowhawk]

Hi all,

One of the databases we use on site has disabled all the menubars when I open access

I have tried to use the shift override however this does not resolve the issue

I have also tried

Application.CommandBars("menu bar").Enabled = True

This works while the database is open but the menu disapears when i close and reopen it, even using the "shift" override.

Thoughts??

Note: am still using access 97 here

 

[RainLover]

Give this a try

For X = 1 To CommandBars.Count
CommandBars(X).Enabled = True
Next X