Partager via


Objet WebListBoxItems (Publisher)

Représente les éléments d’un contrôle de zone de liste web.

Remarques

Utilisez la propriété ListBoxItems de l’objet WebListBox pour accéder aux éléments d’une zone de liste web.

Utilisez la méthode AddItem pour ajouter des éléments à une zone de liste web.

Exemple

Cet exemple crée une zone de liste web et y ajoute plusieurs éléments. Notez qu’une fois créé, un contrôle de zone de liste web contient trois éléments par défaut. Cet exemple inclut une routine qui supprime des éléments de la zone de liste par défaut avant d'ajouter de nouveaux éléments.

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

Méthodes

Propriétés

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.