Clase BuildingBlockEntries (Word VBA)

La clase BuildingBlockEntries representa una colección de todos los objetos BuildingBlock de una plantilla.

Para usar una variable de clase BuildingBlockEntries, primero debe ser instanciado, por ejemplo

Dim bbes as BuildingBlockEntries
Set bbes = CustomizationContext.BuildingBlockEntries

Las variables de tipo BuildingBlockEntries se pueden establecer utilizando el procedimiento Template.BuildingBlockEntries

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos BuildingBlockEntries en una colección.

Dim bbkBuildingBlockEntry As BuildingBlock
For Each bbkBuildingBlockEntry In CustomizationContext.BuildingBlockEntries
	
Next bbkBuildingBlockEntry

Add

Crea una nueva entrada de bloque de creación en una plantilla y devuelve un objeto BuildingBlock que representa la nueva entrada de bloque de creación.

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

Estos son los argumentos con nombre :

Name (String) - Especifica el nombre de la entrada de bloque de creación.

Type (WdBuildingBlockTypes) - Especifica el tipo de bloque de creación para crear.


Aquí puede ver valores posibles para

WdBuildingBlockTypes

Category (String) - Especifica la categoría de la nueva entrada de bloque de creación.

Range (Range) - Especifica el valor de la entrada de bloque básico.

Optional arguments

Los siguientes argumentos son opcionales

Description - String

InsertOptions (WdDocPartInsertOptions) - Especifica si la entrada de bloque de creación se inserta como una página, un párrafo o en línea.

Posibles valores de retorno son wdInsertContent - Bloque de creación entre líneas, wdInsertPage - Bloque de creación de nivel de página, wdInsertParagraph - Bloque de creación de nivel de párrafo.

Count

Devuelve el número de elementos de la colección BuildingBlockEntries.

Dim lngCount As Long
lngCount = CustomizationContext.BuildingBlockEntries.Count

Item

Devuelve un objeto BuildingBlock que representa el elemento especificado de la colección.

Item (Index)

Index: Especifica una cadena o entero que representa el nombre o la posición ordinal del objeto en la colección.

Dim bbkBuildingBlockEntry As BuildingBlock
Set bbkBuildingBlockEntry = CustomizationContext.BuildingBlockEntries(Index:=1)