Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Este método 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.
Sintaxis
expresión. Agregar (Nombre, Tipo, Categoría, Rango, Descripción, InsertOptions)
expresión Expresión que devuelve un objeto "BuildingBlockEntries".
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Name | Obligatorio | String | Especifica el nombre de la entrada de bloque de creación. Corresponde a la propiedad Name del objeto BuildingBlock. |
| Type | Obligatorio | WdBuildingBlockTypes | Especifica el tipo de bloque de creación para crear. Corresponde a la propiedad Type del objeto BuildingBlock. |
| Category | Obligatorio | String | Especifica la categoría de la nueva entrada de bloque de creación. Corresponde a la propiedad Category del objeto BuildingBlock. |
| Range | Obligatorio | Range | Especifica el valor de la entrada de bloque básico. Corresponde a la propiedad Value del objeto BuildingBlock. |
| Description | Opcional | Variant | Especifica la descripción de la entrada de bloque básico. Corresponde a la propiedad Description del objeto BuildingBlock. |
| InsertOptions | Opcional | WdDocPartInsertOptions | Especifica si la entrada de bloque de creación se inserta como una página, un párrafo o en línea. Si se omite, el valor predeterminado es wdInsertContent. Se corresponde con la propiedad InsertOptions del objeto BuildingBlock. |
Valor devuelto
BuildingBlock
Ejemplo
En el siguiente ejemplo, se crea una nueva entrada de bloque de creación y se agrega a la plantilla adjunta al documento activo y, a continuación, se establece el valor del bloque de creación al texto seleccionado.
Dim objTemplate As Template
Dim objBB As BuildingBlock
Set objTemplate = ActiveDocument.AttachedTemplate
Set objBB = objTemplate.BuildingBlockEntries.Add("Author Name", _
wdTypeCustomTextBox, "Custom", Selection.Range)
Vea también
BuildingBlockEntries (colección)
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.