This example uses the value of user
to adjust the command bars according to the user level. If user
is "Level 1," the command bar named "Custom" is displayed. If user
is any other value, the built-in Visual Basic command bar is reset to its default state and the command bar named "Custom" is disabled.
Set myBar = CommandBars("Custom")
If user = "Level 1" Then
myBar.Visible = True
Else
CommandBars("Visual Basic").Reset
myBar.Enabled = False
End If