AddItem Method

Applies To

CommandBarComboBox object.

Description

Adds a list item to the specified command bar combo box control. The combo box control must be a custom control and it must be either a drop-down list box or a combo box.

Note This method will fail if it's applied to a combo box control that's either an edit box or a built-in combo box control.

Syntax

expression.AddItem(Text, Index)

expression Required. An expression that returns a CommandBarComboBox object.

Text Required String. The item to be added to the specified control.

Index Optional Variant. The position of the specified item in the list of items. If this argument is omitted, the item is added at the end of the list.

See Also

Add method (CommandBarControls collection), Clear method, CommandBarComboBox object, Visible property.

Example

This example adds a combo box control to the command bar named "Custom," and then it adds two items to the list. The example also sets the number of line items, the width of the combo box, and an empty default for the combo box.

Set myBar = CommandBars("Custom")
Set myControl = myBar.Controls.Add(Type:=msoControlComboBox, Id:=1)
With myControl
    .AddItem "First Item", 1
    .AddItem "Second Item", 2
    .DropDownLines = 3
    .DropDownWidth = 75
    .ListHeaderCount = 0
End With