silversurfer
09-05-2011, 06:30 AM
I've been looking at disabling various control buttons in word, and have been able to find code and examples for a number of controls Use the control IDs identified
'to disable of enable individual controls
'throughout XL
Sub Find_Disable_Commands()
Dim myControls As CommandBarControls
Dim ctl As CommandBarControl
Set myControls = CommandBars.FindControls _
(Type:=msoControlButton, ID:=21) '21 = cut
For Each ctl In myControls
ctl.Enabled = False
Next ctl
End Sub
- but have been unable to find anything relating to the undo button, which I need a macro to disable. Is this possible?
'to disable of enable individual controls
'throughout XL
Sub Find_Disable_Commands()
Dim myControls As CommandBarControls
Dim ctl As CommandBarControl
Set myControls = CommandBars.FindControls _
(Type:=msoControlButton, ID:=21) '21 = cut
For Each ctl In myControls
ctl.Enabled = False
Next ctl
End Sub
- but have been unable to find anything relating to the undo button, which I need a macro to disable. Is this possible?