全部显示

CommandBarComboBox 对象

CommandBars (CommandBar) CommandBarControls (CommandBarControl) CommandBarButton CommandBarComboBox CommandBarPopup

代表命令栏中的一个组合框控件。

使用 CommandBarComboBox 对象

用 Controls(index) 可返回一个 CommandBarComboBox 对象；此处 index 是该控件的索引号。（该控件的 Type 属性必须是 msoControlEdit、msoControlDropdown、msoControlComboBox、msoControlButtonDropdown、msoControlSplitDropdown、msoControlOCXDropdown、msoControlGraphicCombo 或 msoControlGraphicDropdown。）

以下示例可在命令栏“Custom”的第二个控件中添加两项，然后调整该控件的尺寸。

Set combo = CommandBars("Custom").Controls(2)
With combo
    .AddItem "First Item", 1
    .AddItem "Second Item", 2
    .DropDownLines = 3
    .DropDownWidth = 75
    .ListIndex = 0
End With

用 FindControl 方法也可返回一个 CommandBarComboBox 对象。以下示例可在所有命令栏中查找一个显示于屏幕上的 CommandBarComboBox 对象，该对象的标识为“sheet assignments”。

Set myControl = CommandBars.FindControl _
(Type:=msoControlComboBox, Tag:="sheet assignments", Visible:=True)