Свойство Application.ListGalleries (Word)
Возвращает коллекцию ListGalleries , представляющую три коллекции шаблонов списка. .
Синтаксис
выражение. ListGalleries
выражение: переменная, представляющая объект Application.
Примечания
Каждая коллекция шаблонов (маркированные, нумерованные и нумерованные структуры) соответствует вкладке в диалоговом окне Маркеры и нумеровка (меню Формат ). Сведения о возврате одного члена коллекции см. в разделе Возвращение объекта из коллекции.
Пример
В этом примере переменная mylsttmp задается вторым шаблоном списка на вкладке "Нумерованный контур " в диалоговом окне Маркеры и нумеровка . Затем этот шаблон применяется к первому списку в активном документе.
Set mylsttmp = _
ListGalleries(wdOutlineNumberGallery).ListTemplates(2)
ActiveDocument.Lists(1).ApplyListTemplate ListTemplate:=mylsttmp
В этом примере выполняется циклический переход по коллекции ListGalleries и изменение шаблонов в каждой коллекции шаблонов списка на встроенный шаблон.
For Each listgal In ListGalleries
For i = 1 To 7
listgal.Reset(i)
Next i
Next listgal
См. также
Поддержка и обратная связь
Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.