Метод ContentControlListEntries.Add (Word)
Добавляет новый элемент списка в раскрывающийся список или элемент управления содержимым со списком и возвращает объект ContentControlListEntry .
Синтаксис
expression. Добавить (Текст, Значение, Индекс)
Выражение Выражение, возвращающее объект ContentControlListEntries .
Параметры
Имя | Обязательный или необязательный | Тип данных | Описание |
---|---|---|---|
Текст | Обязательный | String | Задает отображаемый текст для элемента списка. Соответствует свойству Text для объекта ContentControlListEntry . |
Value (Значение) | Необязательный | String | Задает значение элемента списка. Соответствует свойству Value для объекта ContentControlListEntry . Если этот параметр опущен, свойство Value равно свойству Text . |
Индекс; | Необязательный | Long | Задает порядковый номер нового элемента в списке. Если элемент существует в указанной позиции, существующий элемент толкается вниз в списке. Если этот параметр опущен, новый элемент добавляется в конец списка. |
Возвращаемое значение
ContentControlListEntry
Замечания
Записи списка должны иметь уникальные отображаемые имена. При попытке добавить элемент списка, который уже существует, возникает ошибка во время выполнения.
Пример
В следующем примере кода создается новый элемент управления содержимым раскрывающегося списка, а затем в него добавляется несколько элементов.
Dim objCC As ContentControl
Dim objLE As ContentControlListEntry
Dim objMap As XMLMapping
Set objCC = ActiveDocument.ContentControls.Add(wdContentControlDropdownList)
'List items
objCC.DropdownListEntries.Add "Cat"
objCC.DropdownListEntries.Add "Dog"
objCC.DropdownListEntries.Add "Equine"
objCC.DropdownListEntries.Add "Monkey"
objCC.DropdownListEntries.Add "Snake"
objCC.DropdownListEntries.Add "Other"
См. также
Коллекция ContentControlListEntries
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.