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
más sencilla.Agregar (Nombre, Tipo, Categoría, Rango, Descripción, InsertOptions)
expresión Una 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
Bloque de creación
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.