Classe BuildingBlockEntries (Word VBA)
La classe BuildingBlockEntries représente une collection de tous les objets BuildingBlock dans un modèle. Pour utiliser une variable de classe BuildingBlockEntries, elle doit d'abord être instanciée, par exemple
Dim bbes as BuildingBlockEntries
Set bbes = CustomizationContext.BuildingBlockEntries
For Each
Voici un exemple de traitement des éléments BuildingBlockEntries dans une collection
Dim bbkBuildingBlockEntry As BuildingBlock
For Each bbkBuildingBlockEntry In CustomizationContext.BuildingBlockEntries
Next bbkBuildingBlockEntry
Add
Crée une nouvelle entrée du bloc de construction dans un modèle et renvoie un objet BuildingBlock qui représente la nouvelle entrée du bloc de construction.
Add (Name, Type, Category, Range, Description, InsertOptions)
Dim objTemplate As Template
Dim objBB As BuildingBlock
Set objTemplate = ActiveDocument.AttachedTemplate
Set objBB = objTemplate.BuildingBlockEntries.Add("Author Name", _
wdTypeCustomTextBox, "Custom", Selection.Range)
Arguments
Les arguments nommés :
Name (String) - Spécifie le nom de l'entrée du bloc de construction.
Type (WdBuildingBlockTypes) - Spécifie le type de bloc de construction à créer.
Ici on trouve valeurs possible pour
Category (String) - Spécifie la catégorie de la nouvelle 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 BuildingBlockEntries.
Dim lngCount As Long
lngCount = CustomizationContext.BuildingBlockEntries.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 bbkBuildingBlockEntry As BuildingBlock
Set bbkBuildingBlockEntry = CustomizationContext.BuildingBlockEntries(Index:=1)