Custom Toolbars?

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

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.
 
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
 
Thanks Martin - did the trick!!
--
Sharon


Martin said:
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 said:
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.
Click to expand...
Click to expand...
 
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


Martin said:
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 said:
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.
Click to expand...
Click to expand...
Click to expand...
 
Back
Top