Sub TestCommandBarUtilities() ShowCommandBar "Borders", True End Sub Sub ShowCommandBar(sName As String, bShow As Boolean) If CommandBarExists(sName) Then Application.CommandBars(sName).Visible = bShow End If End Sub