Application VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Application
  4. Adjusting a controls Visible property
Sub ToggleAllToolbars()
    For Each cb In CommandBars
        If cb.Type = msoBarTypeNormal Then
            cb.Visible = Not cb.Visible
        End If
    Next cb
End Sub