Partilhar via


Método ContentControlListEntries.Add (Word)

Inclui um novo item de lista em um controle de conteúdo de caixa de combinação ou lista suspensa e retorna um objeto ContentControlListEntry.

Sintaxe

expressão. Adicionar (Texto, Valor, Índice)

Expressão Uma expressão que retorna um objeto ContentControlListEntries .

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Text Obrigatório String Especifica o texto de exibição do item de lista. Corresponde à propriedade Text de um objeto ContentControlListEntry.
Value Opcional String Especifica o valor do item da lista. Corresponde à propriedade Value de um objeto ContentControlListEntry. Se for omitido, a propriedade Value é igual à propriedade Text.
Index Opcional Long Especifica a posição ordinal do novo item na lista. Se existir um item na posição especificada, o item existente será colocado em uma posição posterior na lista. Se for omitido, o novo item será adicionado ao final da lista.

Valor de retorno

ContentControlListEntry

Comentários

[!OBSERVAçãO] Entradas da lista devem ter nomes para exibição exclusivos. A tentativa de adicionar um item de lista que já existe gera um erro em tempo de execução.

Exemplo

O exemplo de código a seguir cria um novo controle de conteúdo de lista suspensa e adiciona vários itens a ele.

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"

Confira também

Coleção ContentControlListEntries

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.