Todd,

Try
- - - - - - - - - - - - - - - - - - - - - - - - - - - - -
Sub TEST()

Dim CTL As CommandBarControl
For Each CTL In Application.CommandBars(1).Controls
If Application.Trim(CTL.Caption) = "SMS Functions" Then
CTL.Delete
End If
Next

End Sub
- - - - - - - - - - - - - - - - - - - - - - - - - - - - -


--
Regards,
Soo Cheon Jheong
_ _
^¢¯^
--