Объект ContentControlListEntries (Word)
Коллекция ContentControlListEntries содержит объекты ContentControlListEntry , представляющие элементы в раскрывающемся списке или элементе управления содержимым со списком.
Замечания
Используйте метод Add , чтобы добавить элемент в раскрывающийся список или поле со списком. В следующем примере кода метод Add используется для добавления нескольких элементов списка в новый элемент управления содержимым раскрывающегося списка.
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"
Используйте метод Item или свойство DropdownListEntries объекта ContentControl для доступа к отдельному элементу списка в коллекции. В следующем примере кода метод Item используется для доступа к третьему элементу в списке и изменения отображаемого текста.
Примечание.
В следующем примере кода предполагается, что первый объект ContentControl в активном документе является раскрывающимся списком или полем со списком.
Dim objCC As ContentControl Dim objLE As ContentControlListEntry Dim objMap As XMLMapping Set objCC = ActiveDocument.ContentControls(1) Set objLE = objCC.DropdownListEntries.Item(3) objLE.Text = "Horse"
Используйте метод Clear , чтобы удалить все элементы из раскрывающегося списка или поля со списком. В следующем примере кода очищается все элементы из первого элемента управления содержимым в активном документе.
Примечание.
В следующем примере кода предполагается, что первым элементом управления содержимым в активном документе является раскрывающийся список или поле со списком.
Dim objCC As ContentControl Set objCC = ActiveDocument.ContentControls(1) objCC.DropdownListEntries.Clear
См. также
Справочник по объектной модели Word
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.