Word) (Categories 对象

代表构建基块类别的集合。

备注

使用 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 方法访问现有类别;若要创建新类别,请使用 BuildingBlockEntries 集合的 Add 方法。 设置类别参数的值。

有关构建基块的详细信息,请参阅处理构建基块

另请参阅

Word 对象模型参考

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。