用VBA代码处理菜单和工具栏之五

删除菜单和工具栏

可以右键单击已有的工具栏，在弹出的自定义对话框中删除工具栏和菜单栏，也可以通过VBA删除，但只能通过VBA删除弹出菜单栏，使用CommandBars集合中的Delete方法从当前CommandBars集合中删除已有的弹出菜单栏。可以参考以下方法:

函数CBDeleteCBControl(strCBarName As String，_

strCtlName作为字符串)

出错时继续下一步

申请。命令栏(strCBarName)。控件(strCtlName)。删除

结束功能

注意:如果在参数strCBarName中没有指定你要删除的工具栏，那么在上面的函数中就不会有错误提示，执行会通过错误恢复下一步的语句继续。