Classe ContentControlListEntry (Word VBA)

Un objet ContentControlListEntry représente un élément de liste dans une liste déroulante liste ou une liste déroulante case contrôle de contenu.

Les procédures principales de la classe ContentControlListEntry sont ContentControlListEntries.Add, Delete et Select

Set

Pour utiliser une variable de classe ContentControlListEntry, elle doit d'abord être instanciée, par exemple

Dim ccl as ContentControlListEntry
Set ccl = ActiveDocument.Range.ContentControls(1).DropdownListEntries(Index:=1)

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe ContentControlListEntry : ContentControl.DropdownListEntries, ContentControlListEntries.Add et ContentControlListEntries.Item

For Each

Voici un exemple de traitement des éléments ContentControlListEntry dans une collection

Dim cclListEntry As ContentControlListEntry
For Each cclListEntry In ActiveDocument.Range.ContentControls(1).DropdownListEntries
	If cclListEntry.Text = "Other" Then cclListEntry.Delete
Next cclDropdownListEntry

Méthodes

Les méthodes principales de la classe ContentControlListEntry sont

ContentControlListEntries.Add - Ajoute un nouvel élément de liste à un contrôle de contenu de liste déroulante ou de zone de liste déroulante et renvoie un objet ContentControlListEntry .

Dim strText As String: strText =  
Dim ccl As ContentControlListEntry
Set ccl = ActiveDocument.Range.ContentControls(1).DropdownListEntries.Add(Text:=strText)

Delete - Supprime l'élément spécifié dans le contrôle de contenu de zone de liste déroulante ou de liste déroulante.

ActiveDocument.Range.ContentControls(1).DropdownListEntries(1).Delete

Select - Sélectionne l'entrée de liste dans un contrôle de contenu de liste déroulante ou de zone de liste déroulante et définit le texte du contrôle de contenu sur la valeur de l'élément.

ActiveDocument.Range.ContentControls(1).DropdownListEntries(1).Select

Propriétés

ContentControlListEntries.Count Renvoie le nombre d’éléments dans la collection ContentControlListEntries .

Dim lngCount As Long
lngCount = ActiveDocument.Range.ContentControls(1).DropdownListEntries.Count

ContentControlListEntries.Parent Renvoie un Object qui représente l'objet parent de l'objet ContentControlListEntries spécifié.

Dim objParent As Object
Set objParent = ActiveDocument.Range.ContentControls(1).DropdownListEntries.Parent

Index Cette propriété renvoie ou définit un type long qui représente la position ordinale d’un élément de liste de contrôle de contenu dans la collection d’éléments de liste.

ActiveDocument.Range.ContentControls(1).DropdownListEntries(1).Index =

Parent Renvoie un Object qui représente l'objet parent de l'objet ContentControlListEntry spécifié.

Dim objParent As Object
Set objParent = ActiveDocument.Range.ContentControls(1).DropdownListEntries(1).Parent

Text Cette propriété renvoie ou définit une chaîne qui représente le texte d’affichage d’un élément de liste pour un contrôle de contenu de liste déroulante ou de zone de liste déroulante.

ActiveDocument.Range.ContentControls(1).DropdownListEntries(1).Text =

Value Cette propriété renvoie ou définit une chaîne qui représente la valeur programmatique d’un élément dans un contrôle de contenu de liste déroulante ou de zone de liste déroulante.

ActiveDocument.Range.ContentControls(1).DropdownListEntries(1).Value =