Méthode ContentControlListEntry.MoveUp (Word)
Déplace un élément dans un contrôle de contenu de liste déroulante ou de zone de liste déroulante d'un élément vers le haut, afin de le placer devant l'élément qui le précédait à l'origine.
Syntaxe
expression. MoveUp
Expression Expression qui renvoie un objet ContentControlListEntry .
Exemple
Cet exemple montre comment déplacer le dernier élément du contrôle de contenu de liste déroulante ou de zone de liste déroulante vers le haut, pour qu'il passe en première position.
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
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.