Método ContentControlListEntries.Add (Word)
Agrega un nuevo elemento de lista a un control de contenido de lista desplegable o de cuadro combinado y devuelve un objeto ContentControlListEntry.
Sintaxis
expresión. Agregar (Texto, Valor, Índice)
Expresión Expresión que devuelve un objeto ContentControlListEntries .
Parameters
| Nombre | Obligatorio/opcional | Tipo de datos | Descripción |
|---|---|---|---|
| Text | Obligatorio | String | Especifica el texto para mostrar para el elemento de lista. Corresponde a la propiedad Text de un objeto ContentControlListEntry. |
| Value | Opcional | String | Especifica el valor del elemento de lista. Corresponde a la propiedad Value de un objeto ContentControlListEntry. Si se omite, la propiedad Value es igual a la propiedad Text. |
| Index | Opcional | Long | Especifica la posición ordinal del nuevo elemento en la lista. Si existe un elemento en la posición especificada, éste retrocede una posición en la lista. Si se omite, el nuevo elemento se agrega al final de la lista. |
Valor devuelto
ContentControlListEntry
Comentarios
[!NOTA] Entradas de la lista deben tener nombres de presentación únicos. Si se intenta agregar un elemento de lista que ya existe, se producirá un error en tiempo de ejecución.
Ejemplo:
En el siguiente ejemplo de código se crea un nuevo control de contenido de lista desplegable y, a continuación, se agregan a él varios elementos.
Dim objCC As ContentControl
Dim objLE As ContentControlListEntry
Dim objMap As XMLMapping
Set objCC = ActiveDocument.ContentControls.Add(wdContentControlDropdownList)
'List items
objCC.DropdownListEntries.Add "Cat"
objCC.DropdownListEntries.Add "Dog"
objCC.DropdownListEntries.Add "Equine"
objCC.DropdownListEntries.Add "Monkey"
objCC.DropdownListEntries.Add "Snake"
objCC.DropdownListEntries.Add "Other"
Consulte también
Colección ContentControlListEntries
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.