View Single Post
  #8   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Gary Brown Gary Brown is offline
external usenet poster
 
Posts: 178
Default Options Dialog Excel 2003

Building on what Mike wrote, here are some macros for
disable/enable/hide/show...
'/================================/
Sub DeactivateIt()
With Application.CommandBars("Worksheet Menu Bar")
.Controls("&Tools").Controls("&Options...").Enable d = False
End With
End Sub
'/================================/
Sub ReactivateIt()
With Application.CommandBars("Worksheet Menu Bar")
.Controls("&Tools").Controls("&Options...").Enable d = True
End With
End Sub
'/================================/
Sub HideIt()
With Application.CommandBars("Worksheet Menu Bar")
.Controls("&Tools").Controls("&Options...").Visibl e = False
End With
End Sub
'/================================/
Sub ShowIt()
With Application.CommandBars("Worksheet Menu Bar")
.Controls("&Tools").Controls("&Options...").Visibl e = True
End With
End Sub
'/================================/


--
HTH,
Gary Brown

If this post was helpful to you, please select ''YES'' at the bottom of the
post.



"gibsol" wrote:

another question on this before I go ahead and enter VBA.
To show the options selection for my purposes only would I have to go into
VBA and change Enabled = False, to show Enabled = True.

"Mike" wrote:

Sorry, I made it too complicated.

Sub DeactivateIt()
With Application.CommandBars("Worksheet Menu Bar").Controls("&Tools")
.Controls("&Options...").Enabled = False
End With
End Sub

Mike

"gibsol" wrote:

I would like to hide the options box from view (tool/options), any ideas !!?.