Share via


AddItem Method

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

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

expression**.AddItem(Text**, Index)

*expression   * Required. An expression that returns a CommandBarComboBox object.

Text    Required String. The text added to the control.

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

Example

This example adds a combo box control to a command bar. Two items are added to the control, and the number of line items and the width of the combo box are set.

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

Applies to | CommandBarComboBox Object

See Also | Clear Method | CommandBarComboBox Object | Visible Property