Propriété WebListBox.ListBoxItems (Publisher)

Renvoie un objet WebListBoxItems qui représente les éléments d’un contrôle de zone de liste web.

Syntaxe

expression. ListBoxItems

expression Variable qui représente un objet WebListBox .

Valeur renvoyée

WebListBoxItems

Exemple

Cet exemple crée un contrôle de zone de liste web et y ajoute cinq nouveaux éléments de liste.

Sub NewListBoxItems() 
 Dim intCount As Integer 
 With ActiveDocument.Pages(1).Shapes.AddWebControl _ 
 (Type:=pbWebControlListBox, Left:=100, _ 
 Top:=100, Width:=150, Height:=100).WebListBox 
 .MultiSelect = msoTrue 
 With .ListBoxItems 
 For intCount = 1 To .Count 
 .Delete (1) 
 Next 
 .AddItem Item:="Yellow" 
 .AddItem Item:="Red" 
 .AddItem Item:="Blue" 
 .AddItem Item:="Green" 
 .AddItem Item:="Black" 
 End With 
 End With 
End Sub

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.