commandbars
VBA 获取Word 所有CommandBar ID命令按钮
Sub 获取所有CommandBarID() Dim wdApp As Object ' Word.Application Dim cb As Object ' CommandBar Dim s As String, id As String Set wdApp = CreateObject("Wo ......
VBA*CommandBars控制菜单栏上的菜单(如页面设置、打印)
Sub test() '视图工具栏中,各种工具对应的英文名称 'worksheet menu bar表示工作表菜单栏 Application.CommandBars("worksheet menu bar").Enabled = false 'formatting表示格式工具栏 Applicatio ......