Insertar un control de contenido en un bloque de creación
Los bloques de creación y los controles de contenido son extremadamente flexibles. Puede crear bloques de creación que contengan controles de contenido, o puede crear controles de contenido que utilicen bloques de creación para ofrecer una amplia selección de contenido al usuario. Este tema muestra cómo insertar un control de contenido en un bloque de creación que los usuarios podrán insertar en sus documentos posteriormente.
Los objetos usados en este ejemplo son:
El siguiente código inserta un control de contenido en el documento activo y, a continuación, agrega el control de contenido a la colección de bloques de creación en la plantilla adjunta al documento activo.
Sub InsertContentControlIntoBuildingBlock()
Dim objCC As ContentControl
Dim objBB As BuildingBlock
Dim objTemplate As Template
Dim objRange As Range
Set objTemplate = ActiveDocument.AttachedTemplate
Set objCC = ActiveDocument.Range.ContentControls _
.Add(wdContentControlComboBox)
objCC.DropdownListEntries.Add "Outstanding"
objCC.DropdownListEntries.Add "Good"
objCC.DropdownListEntries.Add "Fair"
Set objRange = ActiveDocument.Range
Set objBB = objTemplate.BuildingBlockEntries.Add("OGF Rating Scale", _
wdTypeCustom1, "Ratings", objRange)
End Sub
Consulte tambié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.