vba返回excel中所有菜单命令栏CommandBar的名称

布满荆棘的人生 2023-06-16 08:07 16阅读 0赞

命令栏对象为[CommandBar][]。  
在office中命令栏包含有菜单栏、工具栏。  
由于excel 2007版本开始，微软用ribbon代替了原来常用的菜单栏、工具栏。  
所以很多菜单栏、工具栏都已经不存在了，但是有些还是有使用价值的，比如单元格右键菜单栏。  
所有的菜单栏、工具栏集合在一起，构成了[CommandBar][]集合对象。  
如果要在vba中操作具体的命令栏，可以使用CommandBars ( index )，其中index是命令栏的名称或者索引号。  
如果要知道所有命令栏的名称可以使用如下的代码：

Sub QQ1722187970()
        Dim oCB As CommandBar
        Dim oWK As Worksheet
        Set oWK = ActiveSheet
        oWK.Cells.Clear
        Dim iCol As Integer
        arr = Array("命令栏名称", "命令栏中文名称", "是否内置命令栏", "是否可见")
        iCol = UBound(arr) + 1
        oWK.Range("a1").Resize(1, iCol) = arr
        i = 2
        For Each oCB In Excel.Application.CommandBars
            With oWK
                .Cells(i, "a") = oCB.Name
                .Cells(i, "b") = oCB.NameLocal
                .Cells(i, "c") = oCB.BuiltIn
                .Cells(i, "d") = oCB.Visible
                i = i + 1
            End With
        Next
        oWK.Columns.AutoFit
    End Sub

运行后的结果如下：

<table> 
 <tbody> 
  <tr> 
   <td>命令栏名称</td> 
   <td>命令栏中文名称</td> 
   <td>是否内置命令栏</td> 
   <td>是否可见</td> 
  </tr> 
  <tr> 
   <td>Worksheet Menu Bar</td> 
   <td>工作表菜单栏</td> 
   <td>TRUE</td> 
   <td>TRUE</td> 
  </tr> 
  <tr> 
   <td>Chart Menu Bar</td> 
   <td>图表菜单栏</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Circular Reference</td> 
   <td>循环引用</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Standard</td> 
   <td>常用</td> 
   <td>TRUE</td> 
   <td>TRUE</td> 
  </tr> 
  <tr> 
   <td>Formatting</td> 
   <td>格式</td> 
   <td>TRUE</td> 
   <td>TRUE</td> 
  </tr> 
  <tr> 
   <td>PivotTable</td> 
   <td>数据透视表</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Chart</td> 
   <td>图表</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Reviewing</td> 
   <td>审阅</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Forms</td> 
   <td>窗体</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Stop Recording</td> 
   <td>停止录制</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>External Data</td> 
   <td>外部数据</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Formula Auditing</td> 
   <td>公式审核</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Full Screen</td> 
   <td>全屏显示</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>PivotChart Menu</td> 
   <td>数据透视图菜单</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Visual Basic</td> 
   <td>Visual Basic</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Web</td> 
   <td>Web</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Control Toolbox</td> 
   <td>控件工具箱</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Exit Design Mode</td> 
   <td>退出设计模式</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Refresh</td> 
   <td>刷新</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Watch Window</td> 
   <td>监视窗口</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>PivotTable Field List</td> 
   <td>数据透视表字段列表</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Borders</td> 
   <td>边框</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Protection</td> 
   <td>保护</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Text To Speech</td> 
   <td>文本到语音</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>List</td> 
   <td>列表</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Compare Side by Side</td> 
   <td>并排比较</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Workbook tabs</td> 
   <td>工作簿标签</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Cell</td> 
   <td>单元格</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Column</td> 
   <td>列</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Row</td> 
   <td>行</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Cell</td> 
   <td>单元格</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Column</td> 
   <td>柱形图</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Row</td> 
   <td>行</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Ply</td> 
   <td>Ply</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>XLM Cell</td> 
   <td>XLM 单元格</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Document</td> 
   <td>文档</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Desktop</td> 
   <td>桌面</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Nondefault Drag and Drop</td> 
   <td>非默认拖放</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>AutoFill</td> 
   <td>自动填充</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Button</td> 
   <td>按钮</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Dialog</td> 
   <td>对话框</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Series</td> 
   <td>序列</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Plot Area</td> 
   <td>绘图区</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Floor and Walls</td> 
   <td>基底和墙纸</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Trendline</td> 
   <td>趋势线</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Chart</td> 
   <td>图表</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Format Data Series</td> 
   <td>设置数据系列格式</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Format Axis</td> 
   <td>设置坐标轴格式</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Format Legend Entry</td> 
   <td>设置图例项格式</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Formula Bar</td> 
   <td>编辑栏</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>PivotTable Context Menu</td> 
   <td>数据透视表上下文菜单</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Query</td> 
   <td>查询</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Query Layout</td> 
   <td>查询布局</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>AutoCalculate</td> 
   <td>自动计算</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Object/Plot</td> 
   <td>对象/图形区</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Title Bar (Charting)</td> 
   <td>标题栏(图表)</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Layout</td> 
   <td>框架</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Pivot Chart Popup</td> 
   <td>数据透视图快捷菜单</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Phonetic Information</td> 
   <td>拼音信息</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Auto Sum</td> 
   <td>自动合计</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Paste Special Dropdown</td> 
   <td>选择性粘贴下拉框</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Find Format</td> 
   <td>查找格式</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Replace Format</td> 
   <td>替换格式</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>List Range Popup</td> 
   <td>列表区域快捷菜单</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>List Range Layout Popup</td> 
   <td>列表区域布局快捷菜单</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>XML Range Popup</td> 
   <td>XML 区域快捷菜单</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>List Range Layout Popup</td> 
   <td>列表区域布局快捷菜单</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Nil</td> 
   <td>Nil</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Filter Names</td> 
   <td>筛选器名称</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Excel Previewer</td> 
   <td>Excel 预览器</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>&amp;Legacy Keyboard Support</td> 
   <td>旧式键盘支持(&amp;L)</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Row</td> 
   <td>行</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Column</td> 
   <td>列</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Drawing</td> 
   <td>绘图</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>WordArt</td> 
   <td>艺术字</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Picture</td> 
   <td>图片</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Shadow Settings</td> 
   <td>阴影设置</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>3-D Settings</td> 
   <td>三维设置</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Drawing Canvas</td> 
   <td>绘图画布</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Organization Chart</td> 
   <td>组织结构图</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Diagram</td> 
   <td>图示</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Ink Drawing and Writing</td> 
   <td>墨迹绘图与书写</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Ink Annotations</td> 
   <td>墨迹注释</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Borders</td> 
   <td>边框</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Borders</td> 
   <td>边框</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Draw Border</td> 
   <td>绘制边框</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Chart Type</td> 
   <td>图表类型</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Pattern</td> 
   <td>图案</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Font Color</td> 
   <td>字体颜色</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Fill Color</td> 
   <td>填充颜色</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Line Color</td> 
   <td>线条颜色</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Drawing and Writing Pens</td> 
   <td>绘图与书写笔</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Annotation Pens</td> 
   <td>批注笔</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Drawing and Writing Pens</td> 
   <td>绘图和书写笔</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Annotation Pens</td> 
   <td>注释笔</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Order</td> 
   <td>叠放次序</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Nudge</td> 
   <td>微移</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Align or Distribute</td> 
   <td>对齐或分布</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Rotate or Flip</td> 
   <td>旋转或翻转</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Lines</td> 
   <td>直线</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Connectors</td> 
   <td>连接线</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>AutoShapes</td> 
   <td>自选图形</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Callouts</td> 
   <td>标注</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Flowchart</td> 
   <td>流程图</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Block Arrows</td> 
   <td>箭头总汇</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Stars &amp; Banners</td> 
   <td>星与旗帜</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Basic Shapes</td> 
   <td>基本形状</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Insert Shape</td> 
   <td>插入形状</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Shapes</td> 
   <td>形状</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Inactive Chart</td> 
   <td>非活动图表</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Excel Control</td> 
   <td>Excel 控件</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Curve</td> 
   <td>曲线</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Curve Node</td> 
   <td>曲线结点</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Curve Segment</td> 
   <td>曲线段</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Pictures Context Menu</td> 
   <td>图片上下文菜单</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>OLE Object</td> 
   <td>OLE 对象</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>ActiveX Control</td> 
   <td>ActiveX 控件</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>WordArt Context Menu</td> 
   <td>艺术字上下文菜单</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Rotate Mode</td> 
   <td>旋转方式</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Connector</td> 
   <td>连接线</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Script Anchor Popup</td> 
   <td>脚本标记快捷菜单</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Canvas Popup</td> 
   <td>Canvas Popup</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Organization Chart Popup</td> 
   <td>Organization Chart Popup</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Diagram</td> 
   <td>图表</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Select</td> 
   <td>选择</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Layout</td> 
   <td>版式</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Task Pane</td> 
   <td>任务窗格</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>&nbsp;</td> 
   <td>&nbsp;</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Property Editor</td> 
   <td>属性编辑器</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Office Clipboard</td> 
   <td>Office 剪贴板</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>XML Source</td> 
   <td>XML 源</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Research</td> 
   <td>信息检索</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>XML Document</td> 
   <td>XML 文档</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Signatures</td> 
   <td>签名</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Document Actions</td> 
   <td>文档操作</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Clip Art</td> 
   <td>剪贴画</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Selection</td> 
   <td>选择</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Format Object</td> 
   <td>设置对象格式</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Document Management</td> 
   <td>文档管理</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Document Updates</td> 
   <td>文档更新</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Mail Merge Panes</td> 
   <td>邮件合并窗格</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Fax Service</td> 
   <td>传真服务</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Meeting Workspace</td> 
   <td>会议工作区</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Attachment Options</td> 
   <td>附件选项</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Accessibility Checker</td> 
   <td>辅助功能检查器</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Proofing</td> 
   <td>校对</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Dictionaries</td> 
   <td>词典</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Thesaurus</td> 
   <td>同义词库</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>History</td> 
   <td>历史记录</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Share</td> 
   <td>共享</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Insights</td> 
   <td>见解</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Ribbon Adapter</td> 
   <td>Ribbon Adapter</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Add Command</td> 
   <td>添加命令</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Built-in Menus</td> 
   <td>内置菜单</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Clipboard</td> 
   <td>剪贴板</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Envelope</td> 
   <td>信封</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>&nbsp;</td> 
   <td>&nbsp;</td> 
   <td>TRUE</td> 
   <td>FALSE</td> 
  </tr> 
  <tr> 
   <td>Status Bar</td> 
   <td>状态栏</td> 
   <td>TRUE</td> 
   <td>TRUE</td> 
  </tr> 
  <tr> 
   <td>Ribbon</td> 
   <td>Ribbon</td> 
   <td>TRUE</td> 
   <td>TRUE</td> 
  </tr> 
 </tbody> 
</table>

**其中几个常用的命令栏是”Worksheet Menu Bar”、“Standard”、“Cell”，它们分别对应的是菜单命令、工具栏命令和单元格右键菜单命令。**

比如要操作单元格右键菜单栏，可以用以下代码获得该菜单栏的对象：

Dim oCB As CommandBar
    Set oCB= Excel.Application.CommandBars("Cell")

[CommandBar]: https://msdn.microsoft.com/en-us/library/ff862548%28v=office.14%29.aspx