Disabling the Tools Menu
 

I have a question regarding diabling the tools menus. I want to know is
there a way i can diable a use from clickon on tools and the menu won't show
up or if you can gray out certain or all the buttons? Any help is greatly
appreciated.

Disabling the Tools Menu
 

Hide the menu

Application.Commandbars("Worksheet Menu Bar").Controls("Tools").Visible
= False

to disable a particular sub-menu

Application.Commandbars("Worksheet Menu
Bar").Controls("Tools").Controls("Add-Ins...").enabled=false

-

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Rich Cooper" wrote in message
...
I have a question regarding diabling the tools menus. I want to know is
there a way i can diable a use from clickon on tools and the menu won't
show
up or if you can gray out certain or all the buttons? Any help is greatly
appreciated.

Disabling the Tools Menu
 

Or this

In Dutch Tools is Extra for example and Bob's code will not work

Sub a()
'disable Tools menu
Application.CommandBars(1).FindControl(, 30007).Enabled = False
End Sub

Sub b()
Application.CommandBars(1).FindControl(, 30007).Enabled = True
End Sub




--
Regards Ron de Bruin
http://www.rondebruin.nl


"Bob Phillips" wrote in message ...
Hide the menu

Application.Commandbars("Worksheet Menu Bar").Controls("Tools").Visible
= False

to disable a particular sub-menu

Application.Commandbars("Worksheet Menu
Bar").Controls("Tools").Controls("Add-Ins...").enabled=false

-

HTH

Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)

"Rich Cooper" wrote in message
...
I have a question regarding diabling the tools menus. I want to know is
there a way i can diable a use from clickon on tools and the menu won't
show
up or if you can gray out certain or all the buttons? Any help is greatly
appreciated.