Propriedade Range.ContentControls (Word)

Retorna uma coleção ContentControls que representa os controles de conteúdo contidos em um intervalo. Somente leitura.

Sintaxe

expression. ContentControls

expressão Uma expressão que retorna um objeto Range.

Exemplo

O exemplo a seguir insere um controle de conteúdo da lista suspensa na posição especificada do documento ativo.

Dim objCC As ContentControl 
Dim objRange as Range 
 
Set objRange = ActiveDocument.Range(200, 200) 
Set objCC = objRange.ContentControls.Add(wdContentControlDropdownList) 
 
'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"

Confira também

Objeto Range

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.