invisible toolbars 1

[peljo]

With my command DoCmd.ShowToolbar "Toolbar1", acToolbarYes i make my
toolbar Toolbar1 visible.I want at the same time make all other
toolbars on the screen invisible,regardless how they are
called.Sometimes i have
different toolbars shown and i am interested in a command that does
not refer toa specific toolbar, but makes all the toolbats on the
screeninvisible.Is it possible ?

 

[TheAceMan1]

How are ya peljo . . .

. . . and this . . .

[blue]   Dim cb As Object
   
   For Each cb In CommandBars
      If cb.Name = "[purple][b]YourToolBarName[/b][/purple]" Then
         cb.Visible = True
      ElseIf cb.Visible Then
         cb.Visible = False
      End If
   Next

End Sub[/blue]

See Ya! . . . . . .