Método ContentControlListEntry.Delete (Word)
Exclui o item especificado de um controle de conteúdo de lista suspensa ou caixa de combinação.
Sintaxe
expressão. Excluir
Expressão Uma expressão que retorna um objeto ContentControlListEntry .
Exemplo
O exemplo a seguir exclui um item de lista suspensa se o texto de exibição do item for "Outro".
Dim objCC As ContentControl
Dim objCL As ContentControlListEntry
For Each objCC In ActiveDocument.ContentControls
If objCC.Type = wdContentControlComboBox Or _
objCC.Type = wdContentControlDropdownList Then
For Each objCL In objCC.DropdownListEntries
If objCL.Text = "Other" Then objCL.Delete
Next
End If
Next
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.