View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
FSt1 FSt1 is offline
external usenet poster
 
Posts: 3,942
Default Disable Options in 2003

hi
run this code from a standard module. this will disable the options control.
to enable the options control change........
ctl.Enabled = False from False to True and run code again.

Sub disableoptions()
Dim myCtl As CommandBarControls
Dim ctl As CommandBarControl
Set myCtl = CommandBars.FindControls _
(Type:=msoControlButton, ID:=522)
For Each ctl In myCtl
ctl.Enabled = True
Next ctl
End Sub

see this site for a list of MS controls.
http://support.microsoft.com/kb/213552

regards
FSt1

"Jeremy" wrote:

I am wanting to disable to 2003 options to where a user can not turn on the
row & column headers.

Can someone please help with this.


Thank you