Поделиться через

Объект Categories (Word)

  • Статья

Представляет коллекцию категорий стандартных блоков.

Замечания

Используйте метод Item для доступа к существующей категории. Затем можно использовать свойство BuildingBlocks для доступа к коллекции объектов BuildingBlock для категории. В следующем примере имена типов и категорий всех стандартных блоков в первом шаблоне выводятся в окно интерпретации. (В этом примере предполагается, что окно интерпретации отображается.)

Dim objTemplate As Template 
Dim objBBT As BuildingBlockType 
Dim objCat As Category 
Dim intCount As Integer 
Dim intCountCat As Integer 
 
Set objTemplate = Templates(1) 
 
For intCount = 1 To objTemplate.BuildingBlockTypes.Count 
 Set objBBT = objTemplate.BuildingBlockTypes(intCount) 
 If objBBT.Categories.Count > 0 Then 
 Debug.Print objBBT.Name 
 For intCountCat = 1 To objBBT.Categories.Count 
 Set objCat = objBBT.Categories(intCountCat) 
 Debug.Print vbTab & objCat.Name 
 Next 
 End If 
Next

Используйте метод Item для доступа к существующей категории; чтобы создать новую категорию, используйте метод Add коллекции BuildingBlockEntries . Задайте значение параметра Category.

Дополнительные сведения о стандартных блоках см. в разделе Работа со стандартными блоками.

См. также

Справочник по объектной модели Word

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

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