Objeto Categories (Word)

Representa uma coleção de categorias de bloco de construção.

Comentários

Use o método Item para acessar uma categoria existente. Em seguida, você pode usar a propriedade BuildingBlocks para acessar uma coleção de objetos BuildingBlock para a categoria. O exemplo a seguir imprime os nomes de tipo e categoria de todos os blocos de construção no primeiro modelo para a janela Immediate. (Este exemplo pressupõe que a janela Immediate esteja visível.)

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 o método Item para acessar uma categoria existente; para criar uma nova categoria, use o método Add da coleção BuildingBlockEntries . Defina o valor do parâmetro Category.

Para obter mais informações sobre os blocos de construção, consulte Trabalhando com blocos de construção.

Confira também

Referência do modelo de objeto do Word

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.