Classe BuildingBlocks (Word VBA)

La classe BuildingBlocks représente une collection d’objets BuildingBlock pour un type de bloc de construction et une catégorie spécifiques dans un modèle. Pour utiliser une variable de classe BuildingBlocks, elle doit d'abord être instanciée, par exemple

Dim bbs as BuildingBlocks
Set bbs = CustomizationContext.BuildingBlockEntries(1).Category.BuildingBlocks

Add

Crée un nouveau bloc de construction et renvoie un objet BuildingBlock .

Add (Name, Range, Description, InsertOptions)

Dim objTemplate As Template 
 
Set objTemplate = Templates(1) 
 
objTemplate.BuildingBlockTypes(wdTypeAutoText) _ 
 .Categories("General").BuildingBlocks _ 
 .Add Name:="New Building Block", _ 
 Range:=Selection.Range

Arguments

Les arguments nommés :

Name (String) - Spécifie le nom de l'entrée du bloc de construction.

Range (Range) - Spécifie la valeur de l'entrée du bloc de construction.

Optional arguments

Les arguments suivants sont facultatifs

Description (String) - Spécifie la description de l'entrée du bloc de construction.

InsertOptions (WdDocPartInsertOptions) - Spécifie si l'entrée du bloc de construction est insérée dans une page, un paragraphe ou en ligne.

Les valeurs de retour possibles sont wdInsertContent - Bloc de construction inséré, wdInsertPage - Bloc de construction de niveau Page, wdInsertParagraph - Bloc de construction de niveau Paragraphe.

Count

Renvoie le nombre d'éléments dans la collection BuildingBlocks.

Dim lngCount As Long
lngCount = CustomizationContext.BuildingBlockEntries(1).Category.BuildingBlocks.Count

Item

Renvoie un objet BuildingBlock qui représente l’élément spécifié dans la collection.

Item (Index)

Index: Spécifie une chaîne ou un entier qui représente le nom ou la position ordinale de l’objet dans la collection.

Dim bbk As BuildingBlock
Set bbk = CustomizationContext.BuildingBlockEntries(1).Category.BuildingBlocks(Index:=1)