CommandBarComboBox 对象

全部显示

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

使用 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)