Clase BuildingBlock - bloque de creación (Word VBA)

La clase BuildingBlock representa un bloque de creación de una plantilla.

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

Dim bbk as BuildingBlock
Set bbk = CustomizationContext.BuildingBlockEntries(Index:=1)

Los siguientes procedimientos se pueden usar para establecer variables de clase BuildingBlock : BuildingBlockEntries.Add, BuildingBlockEntries.Item, BuildingBlocks.Add, BuildingBlocks.Item y ContentControl.PlaceholderText.

For Each

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

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

Category

Devuelve un objeto Category que representa la categoría de un bloque de creación.

Dim ctgCategory As Category
Set ctgCategory = CustomizationContext.BuildingBlockEntries(1).Category

Delete

Este método elimina el bloque de creación especificado.

CustomizationContext.BuildingBlockEntries(1).Delete

Description

Devuelve o establece una cadena que representa la descripción de un bloque de creación.

CustomizationContext.BuildingBlockEntries(1).Description =

ID

Devuelve una cadena que representa el número de identificación interna de un bloque de creación.

La propiedad ID devuelve una cadena de identificación que tiene el formato de un GUID.

Dim strID As String
strID = CustomizationContext.BuildingBlockEntries(1).ID

Index

Devuelve un valor de tipo Long que representa la posición de un elemento en una colección.

Dim lngIndex As Long
lngIndex = CustomizationContext.BuildingBlockEntries(1).Index

Insert

Inserta el valor de un bloque de creación en un documento y devuelve un objeto Range que representa el contenido del bloque de creación en el documento.

Insert (Where, RichText)

Dim objTemplate As Template 
Dim objBB As BuildingBlock 
 
Set objTemplate = Templates(1) 
Set objBB = objTemplate.BuildingBlockEntries(1) 
 
objBB.Insert ActiveDocument.Paragraphs(1).Range

Arguments

Un argumento con nombre

Where (Range) - Ubicación en la que se va a colocar el contenido del bloque de creación.

Optional arguments

Los siguientes argumentos son opcionales

RichText (String) - True inserta el bloque de creación como texto enriquecido y con formato.

InsertOptions

Devuelve o establece un Long que representa la forma de insertar el contenido de un bloque de creación en un documento.

El valor de la propiedad InsertOptions puede ser cualquier constante WdDocPartInsertOptions.

CustomizationContext.BuildingBlockEntries(1).InsertOptions =

Name

Devuelve o establece una cadena que representa el nombre de un bloque de creación.

CustomizationContext.BuildingBlockEntries(1).Name =

Type

Devuelve un objeto BuildingBlockType que representa el tipo de un bloque de creación.

Dim bbtType As BuildingBlockType
Set bbtType = CustomizationContext.BuildingBlockEntries(1).Type

Value

Devuelve o establece una cadena que representa el contenido de un bloque de creación.

CustomizationContext.BuildingBlockEntries(1).Value =