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.