Propriedade WebListBox.ListBoxItems (Publisher)

Retorna um objeto WebListBoxItems que representa os itens em um controle de caixa de listagem da Web.

Sintaxe

mais simples. ListBoxItems

expressão Uma variável que representa um objeto WebListBox .

Valor de retorno

WebListBoxItems

Exemplo

Este exemplo cria um novo controle de caixa de listagem da Web e adiciona cinco novos itens de lista a ele.

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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.