Método ContentControls.Add (Word)
Agrega un nuevo control de contenido, del tipo especificado, al documento activo y devuelve un objeto ContentControl que representa el nuevo control de contenido.
Sintaxis
expresión. Agregar (tipo, rango)
Expresión Expresión que devuelve un objeto ContentControls .
Parameters
Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
---|---|---|---|
Type | Opcional | WdContentControlType | Especifica el tipo de control de contenido que se debe insertar en el documento activo. Si se omite, Microsoft Word inserta un control de contenido de texto enriquecido. |
Range | Opcional | Variant | Especifica el lugar del documento activo en el que se debe colocar el control de contenido. Si se omite, Word coloca el control en la posición del punto de inserción o reemplaza la selección actual. |
Valor devuelto
ContentControl
Comentarios
Los controles de contenido sólo se pueden anidar dentro de controles de contenido de texto enriquecido, controles de contenido de galerías de bloques de creación y controles de contenido de grupo. Si el punto de inserción o la selección actual se encuentran dentro de un control de contenido de otro tipo, este método produce un error. En este caso, puede mover el punto de inserción o bien utilizar el parámetro Range para especificar una ubicación en el documento.
Ejemplo:
En el siguiente ejemplo, se crea un nuevo control de contenido de lista desplegable y se agregan varios elementos a la lista.
Dim objCC As ContentControl
Set objCC = ActiveDocument.ContentControls.Add(wdContentControlDropdownList)
objCC.Title = "My Favorite Animal"
If objCC.ShowingPlaceholderText Then _
objCC.SetPlaceholderText , , "Select your favorite animal "
'List entries
objCC.DropdownListEntries.Add "Cat"
objCC.DropdownListEntries.Add "Dog"
objCC.DropdownListEntries.Add "Horse"
objCC.DropdownListEntries.Add "Monkey"
objCC.DropdownListEntries.Add "Snake"
objCC.DropdownListEntries.Add "Other"
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.
Comentarios
https://aka.ms/ContentUserFeedback.
Próximamente: A lo largo de 2024 iremos eliminando gradualmente GitHub Issues como mecanismo de comentarios sobre el contenido y lo sustituiremos por un nuevo sistema de comentarios. Para más información, vea:Enviar y ver comentarios de