Tools menu

[Fwiz]

on the tools menu - is it possible to lock the options table to prevent changes?? if so how would i do this? - I Assume VBA??

 

[hatman]

One option is to remove this entry from the menu... using VBA. Though the user would still be to add a button to a toolbar to get to Options by using the Tollbar Customization Wizard. It's possible to make that unavailable. Of course, you'd probably want to restore all of that when your program ends. And depending upon how your application is set up, the user may be skeptical of a file that locks them out like that...

 

[Fwiz]

to be honest the users don't exactly know excel very well they end up doing allsorts that they don't understand, all i need to do is prevent access to the options command within the tools menu. - ideally i need this from set up from when the workbook is opened and when its closed it will revert the toolbars back to their normal settings. i still fairly new to vba - any help would be appreciated

many thanks

 

[Fwiz]

to be honest the users don't exactly know excel very well they end up doing allsorts that they don't understand, all i need to do is prevent access to the options command within the tools menu. - ideally i need this from set up from when the workbook is opened and when its closed it will revert the toolbars back to their normal settings. i still fairly new to vba - any help would be appreciated

many thanks

 

[Fwiz]

to be honest the users don't exactly know excel very well they end up doing allsorts that they don't understand, all i need to do is prevent access to the options command within the tools menu. - ideally i need this from set up from when the workbook is opened and when its closed it will revert the toolbars back to their normal settings. i still fairly new to vba - any help would be appreciated

many thanks

 

[Fwiz]

all sorted, i've managed to find a way.......

here is my vba code - just incase anyone else is interested

Sub MenuControl_False()
Dim Ctrl As Office.CommandBarControl
For Each Ctrl In Application.CommandBars.FindControls(ID:=522)
Ctrl.Enabled = False
Next Ctrl
End Sub

Sub MenuControl_True()
Dim Ctrl As Office.CommandBarControl
For Each Ctrl In Application.CommandBars.FindControls(ID:=522)
Ctrl.Enabled = True
Next Ctrl
End Sub

thanks

 

[Datsmart]

Thank you for sharing your solution. I was watching this thread.