ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Worksheet Functions (https://www.excelbanter.com/excel-worksheet-functions/)
-   -   Options Dialog Excel 2003 (https://www.excelbanter.com/excel-worksheet-functions/135400-options-dialog-excel-2003-a.html)

gibsol

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

Bob Phillips

Options Dialog Excel 2003
 
Disable the control?


CommandBars("Worksheet Menu
Bar").Controls("Tools").Controls("Options...").Ena bled = False

--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)



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




Mike

Options Dialog Excel 2003
 
The following code will disable the Tools - Options menu and can be put where
you want. One option is to put it in the workbook open event and have
corresponding code in the workbook before close event to re-enable the
controls.

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

Mike

"gibsol" wrote:

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


Mike

Options Dialog Excel 2003
 
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 !!?.


gibsol

Options Dialog Excel 2003
 
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 !!?.


Dave F

Options Dialog Excel 2003
 
Yes, that's correct.

Dave
--
A hint to posters: Specific, detailed questions are more likely to be
answered than questions that provide no detail about your problem.


"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 !!?.


Bob Phillips

Options Dialog Excel 2003
 
Yes

--
---
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)



"gibsol" wrote in message
...
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 !!?.




Gary Brown

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 !!?.


gibsol

Options Dialog Excel 2003
 
Sorry I did not read your first posting as you said it was to complex, but
that told me the answer I was asking for, and Thanks it works just as I
hoped. Thanks again

"Mike" wrote:

The following code will disable the Tools - Options menu and can be put where
you want. One option is to put it in the workbook open event and have
corresponding code in the workbook before close event to re-enable the
controls.

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

Mike

"gibsol" wrote:

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



All times are GMT +1. The time now is 08:30 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com