[COLOR=blue]
Dim cbrMyToolbar As CommandBar
Set cbrMyToolbar = CommandBars("mnuMyToolbar")
If Not blnHasAdmin Then [b]' Replace with your security check[/b]
cbrMyToolbar.Controls([b]4[/b]).Enabled = False
cbrMyToolbar.Controls([b]6[/b]).Enabled = False
Else
cbrMyToolbar.Controls([b]4[/b]).Enabled = True
cbrMyToolbar.Controls([b]6[/b]).Enabled = True
End If
[/color]