Метод CommandBarComboBox.AddItem (Office)

  • Статья

Добавляет элемент списка в указанный элемент управления со списком панели команд. Элемент управления "Поле со списком" должен быть пользовательским элементом управления и должен быть раскрывающимся списком или полем со списком.

Примечание.

Использование CommandBars в некоторых приложениях Microsoft Office было заменено новым компонентом ленты пользовательского интерфейса Microsoft Office Fluent. Дополнительные сведения см. в статье Обзор ленты Office Fluent.

Синтаксис

expression. AddItem (Текст, Индекс)

Выражение Переменная, представляющая объект CommandBarComboBox .

Параметры

Имя Обязательный или необязательный Тип данных Описание
Текст Обязательный String Текст, добавленный в элемент управления .
Индекс; Необязательный Variant Положение элемента в списке. Если этот аргумент опущен, элемент добавляется в конец списка.

Пример

В этом примере элемент управления "Поле со списком" добавляется на панель команд. В элемент управления добавляются два элемента, а также устанавливается количество строк и ширина поля со списком.

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

Примечание.

Этот метод завершится ошибкой, если он применяется к окну редактирования или встроенному элементу управления со списком.

См. также

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.