Méthode ContentControlListEntry.MoveUp (Word)

Article
04/07/2023

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

Objet ContentControlListEntry

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.

Share via