View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
Big Chris[_26_] Big Chris[_26_] is offline
external usenet poster
 
Posts: 1
Default Removing and replacing toolbars...

I found the code below in a search and it's almost exactly what I want
And yes, it works great. However, I want to maintain the Worksheet Men
Bar.....the one with File, Edit, View etc, but not the actua
toolbars.

Would anyone have any idea how I could adjust this code to enable me t
achieve this objective?

Thanks to Bill Manville for his original answer which almost does th
trick for me too, and thanks in advance for looking at my problem.

---------------------------

Sub Auto_Open()
ShowToolbars False
End Sub

Sub Auto_Close()
ShowToolbars True
End Sub

Sub ShowToolbars(ToBeSeen As Boolean)
Dim CB As CommandBar
For Each CB In Application.CommandBars
CB.Enabled = ToBeSeen
Next
End Sub

-------------------------------


Regards

--
Message posted from http://www.ExcelForum.com