Compartilhar via


Objeto ContentControlListEntries (Word)

A coleção ContentControlListEntries contém objetos ContentControlListEntry que representam os itens em uma lista suspensa ou um controle de conteúdo de caixa de combinação.

Comentários

Use o método Add para adicionar um item a uma caixa de combinação ou lista suspensa. O exemplo de código a seguir usa o método Add para adicionar vários itens de lista para um novo controle de conteúdo de lista suspensa.

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"

Use o método Item ou a propriedade DropdownListEntries de um objeto ContentControl para acessar um item de lista individuais dentro de uma coleção. O exemplo de código a seguir usa o método Item para acessar o terceiro item em uma lista e alterar o texto de exibição.

Observação

[!OBSERVAçãO] O exemplo de código a seguir pressupõe que o primeiro objeto ContentControl no documento ativo for uma caixa de combinação ou lista suspensa.

Dim objCC As ContentControl Dim objLE As ContentControlListEntry Dim objMap As XMLMapping  Set objCC = ActiveDocument.ContentControls(1) Set objLE = objCC.DropdownListEntries.Item(3) objLE.Text = "Horse"

Use o método Clear para remover todos os itens de uma lista suspensa ou caixa de combinação. O exemplo de código a seguir limpa todos os itens do primeiro controle de conteúdo do documento ativo.

Observação

[!OBSERVAçãO] O exemplo de código a seguir supõe que o primeiro controle de conteúdo do documento ativo seja uma lista suspensa ou caixa de combinação.

Dim objCC As ContentControl  Set objCC = ActiveDocument.ContentControls(1)  objCC.DropdownListEntries.Clear

Confira também

Referência do modelo de objeto do Word

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.