Excel Custom Made Toolbar

[drawlings]

Hi Guys,

Need to know if it is possible to enable/disable/hide/show certai
buttons on a custom toolbar I made

Thanks

Da

 

[Norman Jones]

Hi Dan,

Try something like:

'=============>>
Public Sub TesterA01()
Dim TBar As CommandBar

Set TBar = Application.CommandBars("YourToolbar") '<<==== CHANGE
TBar.Controls(1).Enabled = False

End Sub
'<<=============

 

[drawlings]

Thanks for your reply.

That code works great at disabling the toolbar itself, but I need to
disable certain buttons within the toolbar.

Example:

Toolbar Name: P&L
I have 6 buttons in total and I want to disable the second button
'Options'.
Button1 = Download
Button2 = Options

etc.....



Thanks

Dan

 

[Norman Jones]

Hi Dan,

That code works great at disabling the toolbar itself, but I need to
disable certain buttons within the toolbar.

The suggested code does not disable the custom toolbar; it disables only the
first control on the toolbar.

 

[drawlings]

Ok, so is there code to disable a button within a toolbar?

 

[Norman Jones]

Hi Dan,

Yes - try my suggested code.

 

[drawlings]

Norman, thanks again for you reply but please see attachment, it will
explain it better


+-------------------------------------------------------------------+
|Filename: ExcelToobar.JPG |
|Download: http://www.excelforum.com/attachment.php?postid=5206 |
+-------------------------------------------------------------------+

 

[Norman Jones]

Hi Dan,

Try:

Application.CommandBars("YourToolBar"). _
Controls(1).Controls(1).Enabled = False