Lost my Menu Bar in Access

[Erik Nielsen, Ndoro]

I have lost my Menu Bar in MS Access 2003 but only on my computer. It appears
perfectly on other computers. How do I recpature it?

 

[Douglas J. Steele]

Do you mean yu have no menu bar for any database, or just for a specific
one? If the latter, have you tried replacing the copy of the MDB on your
machine?

 

[Erik Nielsen, Ndoro]

Yes that is exactly what I mean, i.e. I have no menu bar for any database. I
have tried working on other computers without having the same problem, i.e.
my conclusion is that it is the general Access setup on my computers that is
the problem. Or?

 

[Douglas J. Steele]

If you're talking about the standard Access menu bar (as opposed to custom
application menu bars), try right-clicking where the menu bar should be and
see whether going to Customize has anything useful.

 

[Mark Andrews]

1. run this code:
Public Function showallmenus()
'Needed once in a while to get the menus back
Dim i As Integer
Dim cbarMenu As CommandBar

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

End Function

2. you then need to manually drag the top menu somewhere and then drag it
back to the original position. It will then remember.

HTH,
Mark Andrews
RPT Software
http://www.rptsoftware.com

 

[rspiet]

I have the same problem (MS Access 2003). When I try running this code I get
an error "User-Defined type not defined" compile error. Am I missing a
reference?

 

[Mark Andrews]

Yes you need a reference to Microsoft Office 12 Object Library

Sorry it took me so long to respond,
Mark