Compartilhar via

Método ContentControlListEntry.MoveUp (Word)

  • Artigo

Move um item em um controle de conteúdo de caixa de combinação ou lista suspensa um item para cima, de forma que ele fique antes do item que originalmente o precedia.

Sintaxe

expression. MoveUp

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

Exemplo

O exemplo a seguir move o último item no controle de conteúdo de caixa de combinação ou lista suspensa para cima, de forma que ele se torne o primeiro item.

Dim objCC As ContentControl 
Dim objCL As ContentControlListEntry 
Dim intCount As Integer 
 
Set objCC = ActiveDocument.ContentControls.Item(3) 
 
If objCC.Type = wdContentControlComboBox Or _ 
 objCC.Type = wdContentControlDropdownList Then 
 
 Set objCL = objCC.DropdownListEntries.Item(objCC.DropdownListEntries.Count) 
 
 For intCount = 1 To objCC.DropdownListEntries.Count 
 objCL.MoveUp 
 Next 
 
End If

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.