Compartilhar via


Método ContentControlListEntry.Select (Word)

Seleciona a entrada de lista em uma lista suspensa ou controle de conteúdo da caixa de combinação e define o texto do controle de conteúdo como o valor do item.

Sintaxe

expressão. Selecione

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

Exemplo

O exemplo a seguir insere um controle de conteúdo de lista suspensa no documento ativo, define o título e o texto do indicador, adiciona vários itens à lista e, em seguida, seleciona o último item inserido.

Dim objCC As ContentControl 
Dim objCE As ContentControlListEntry 
Dim objMap As XMLMapping 
 
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" 
 
Set objCE = objCC.DropdownListEntries.Add("Other") 
objCE.Select

Confira também

Objeto ContentControlListEntry

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.