通过

CommandBars 对象 (Office)

  • 项目

CommandBar 对象的集合，这些对象表示容器应用程序中的命令栏。

注意

某些 Microsoft Office 应用程序中对 CommandBars 的使用已由 Microsoft Office Fluent 用户界面的新功能区组件取代。 有关详细信息，请参阅 Office Fluent 功能区概述。

示例

使用 CommandBars 属性可返回 CommandBars 集合。 下面的示例在“立即”窗口中显示每个菜单栏和工具栏的名称和本地名称，并显示一个值以指示该菜单栏或工具栏是否可见。

For Each cbar in CommandBars 
    Debug.Print cbar.Name, cbar.NameLocal, cbar.Visible 
Next

使用 Add 方法向集合添加新的命令栏。 以下示例创建名为 Custom1 的自定义工具栏，并将其显示为浮动工具栏。

Set cbar1 = CommandBars.Add(Name:="Custom1", Position:=msoBarFloating) 
cbar1.Visible = True

使用 enumName 可返回一个 CommandBar 对象，其中 index 是该命令栏的名称或索引号。 以下示例将名为 Custom1 的工具栏停靠在应用程序窗口的底部。

CommandBars("Custom1").Position = msoBarBottom

注意

使用名称或索引号在容器应用程序中的可用菜单栏和工具栏列表中指定菜单栏或工具栏。 但是，必须使用 名称指定菜单、快捷菜单或子菜单， (所有这些菜单都由 CommandBar 对象表示) 。 如果两个或更多个自定义菜单或子菜单具有相同的名称，则 enumName 将返回第一个菜单或子菜单。 若要确保返回正确的菜单或子菜单，请找到显示该菜单的弹出控件。 然后将 CommandBar 属性应用于弹出控件，以返回表示该菜单的命令栏。

另请参阅

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。