Categories Object (Word)
Represents a collection of building block categories.
Version Information
Version Added: Word 2007
Remarks
Use the Item method to access an exising category. You can then use the BuildingBlocks property to access a collection of BuildingBlock objects for the category. The following example prints the type and category names of all the building blocks in the first template to the Immediate Window. (This example assumes that the Immediate Window is visible.)
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
Use the Item method to access an exising category; to create a new category, use the Add method of the BuildingBlockEntries collection. Set the value of the Category parameter.
For more information about building blocks, see Working with Building Blocks.