I had made those procedures same next exemples:

Private Sub Workbook_Open()
Application.CommandBars("MyToolBar").Visible = True
End Sub

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


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

Luciano,

Excel 2007 doesn't use toolbars anymore.

See the section

Excel 2007 Ribbon and QAT pages

http://www.rondebruin.nl/tips.htm


HTH,
Bernie
MS Excel MVP



"Luciano Severino" <(E-Mail Removed)> wrote in message
news:9E3865A1-0C32-4690-9FC6-(E-Mail Removed)...
>I had made those procedures same next exemples:
>
> Private Sub Workbook_Open()
> Application.CommandBars("MyToolBar").Visible = True
> End Sub
>
> Private Sub Workbook_BeforeClose(Cancel As Boolean)
> Application.CommandBars("MyToolBar").Visible = False
> End Sub
>
>
> It´s running well. But when I save my workbook to another PC with Excell2007
> the "MyToolBar" doesn´t apearence.
> Anybody know why it´s happen?
> Thanks.
>

see if there is add-ins menu option and look there.

--

Gary Keramidas
Excel 2003


"Luciano Severino" <(E-Mail Removed)> wrote in
message news:9E3865A1-0C32-4690-9FC6-(E-Mail Removed)...
>I had made those procedures same next exemples:
>
> Private Sub Workbook_Open()
> Application.CommandBars("MyToolBar").Visible = True
> End Sub
>
> Private Sub Workbook_BeforeClose(Cancel As Boolean)
> Application.CommandBars("MyToolBar").Visible = False
> End Sub
>
>
> It´s running well. But when I save my workbook to another PC with
> Excell2007
> the "MyToolBar" doesn´t apearence.
> Anybody know why it´s happen?
> Thanks.
>