Disable or remove "Business Explorer" in the menu bar

[Former Member]

Hi,

I'm using BEx Analyzer and tring to disable some controls in BEx toolbar. I got some helpful information from the following thread and now I can grey out some toolbar buttons. But I found there is also a "Business Explorer" in the top menu bar. Does anyone know how to disable or remove that?

[edwin_harpino · Accepted solution]

hi MSTF,

try this

Sub Disable_BEx()

Dim CmdBar As CommandBar

Dim CmdBarMenu As CommandBarControl

' Point to the Worksheet Menu Bar

Set CmdBar = Application.CommandBars("Worksheet Menu Bar")

' Point to the BEx menu on the menu bar

Set CmdBarMenu = CmdBar.Controls("Business Explorer")

'to disable menu "Business Explorer"

CmdBarMenu.Enabled = False

'to hide/'remove' menu "Business Explorer"

CmdBarMenu.Visible = False

End Sub

hope this helps.

[Former Member · Accepted solution]

Hi A.H.P.

Great thanks and points assigned.