Freigeben über

Categories Object

  • Artikel
Word Developer Reference

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.)

Visual Basic for Applications 
  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.

See Also