Custom Toolbars?

[Sharon]

Hi

I have designed a custom toolbar that I want to display whenever a specific
workbook is opened and then turned off again when the workbook closes. Does
anyone know how to put that into the On Open event of the workbook? Thanks.

 

[Martin]

You can use the recorder to find the code:

Application.CommandBars("[name]").Visible = True 'to make visible
Application.CommandBars("[name]").Visible = False 'to make invisible

 

[Sharon]

Thanks Martin - did the trick!!
--
Sharon

You can use the recorder to find the code:

Application.CommandBars("[name]").Visible = True 'to make visible
Application.CommandBars("[name]").Visible = False 'to make invisible

Hi

I have designed a custom toolbar that I want to display whenever a specific
workbook is opened and then turned off again when the workbook closes. Does
anyone know how to put that into the On Open event of the workbook? Thanks.

 

[Luciano Severino]

Hello;

I had made this procedure same next exemple:

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Application.CommandBars("Menu Take Up").Visible = False
End Sub

Private Sub Workbook_Open()
Application.CommandBars("Menu Take Up").Visible = True
End Sub

It´s running well. But when I save to another PC with Excell2007 the toolbar
doesn´t apearence.
Anybody know why it´s happen?
Thanks.


"Sharon" escreveu:

Thanks Martin - did the trick!!
--
Sharon

You can use the recorder to find the code:

Application.CommandBars("[name]").Visible = True 'to make visible
Application.CommandBars("[name]").Visible = False 'to make invisible

Hi

I have designed a custom toolbar that I want to display whenever a specific
workbook is opened and then turned off again when the workbook closes. Does
anyone know how to put that into the On Open event of the workbook? Thanks.