Объект Lists (Word)
Коллекция объектов List , представляющих все списки в указанном документе.
Используйте свойство Lists , чтобы вернуть коллекцию Lists . В следующем примере отображается количество элементов в каждом списке активного документа.
For Each li In ActiveDocument.Lists
MsgBox li.CountNumberedItems
Next li
Используйте Lists (Index), где Индекс — это номер индекса, чтобы вернуть один объект List . В следующем примере первый формат списка (за исключением None) применяется на вкладке Нумерованный в диалоговом окне Маркеры и нумеровка во втором списке активного документа.
Set temp1 = ListGalleries(wdNumberGallery).ListTemplates(1)
ActiveDocument.Lists(2).ApplyListTemplate ListTemplate:=temp1
При использовании цикла For Each для перечисления коллекции Lists списки в документе возвращаются в обратном порядке. В следующем примере элементы для каждого списка в активном документе подсчитываются снизу документа вверх.
For Each li In ActiveDocument.Lists
MsgBox li.CountNumberedItems
Next li
Чтобы добавить новый список в документ, используйте метод ApplyListTemplate с объектом ListFormat для указанного диапазона.
Вы можете управлять отдельными объектами List в документе, но для более точного управления следует работать с объектом ListFormat .
Примечание
Маркированные списки с рисунками не включаются в коллекцию Lists .
Имя |
---|
Элемент |
Справочник по объектной модели Word
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.