Objeto Categories (Word)
Representa una colección de categorías de bloques de creación.
Comentarios
Use el método Item para acceder a una categoría existente. A continuación, puede usar la propiedad BuildingBlocks para acceder a una colección de objetos BuildingBlock de la categoría. En el siguiente ejemplo, se imprimen los nombres de tipo y categoría de todos los bloques de creación de la primera plantilla en la ventana Inmediato. (En este ejemplo se supone que se ve la ventana Inmediato.)
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 el método Item para acceder a una categoría existente; Para crear una nueva categoría, use el método Add de la colección BuildingBlockEntries . Establezca el valor del parámetro Category.
Para obtener más información sobre bloques de creación, vea Trabajar con bloques de creación.
Vea también
Referencia de modelos de objetos de Word
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.