How can I desactivate the MENU BAR in access

[Marco Silva]

Hi. I would like to desactivate the MENU BAR in access so users cannot click
were they are not supposed to click.

Marco

 

[ba]

testxbh

 

[Anand]

Paste this function somewhere and call it from your startup form
(switchboard)

Public Function DisableMenus()
Private CmdBar As CommandBarControl

For Each CmdBar In Application.CommandBars("Menu Bar").Controls
CmdBar.Visible = False
Next

End Function

 

[Marco Silva]

Hi, it returns me an error. I past the code into a Module, after I when to
swithboas and On Load I write Call DisableManus

But returns me an error.
Marco

 

[Rob Parker]

Hi Marco,

Details of the error would have been helpful.

However, when I tried this, I found that the declaration
Private CmdBar As CommandBarControl
gave me a compile error. Replacing this with
Dim CmdBar As Object
removed the error, and the routine works.

HTH,

Rob