Objeto WebListBoxItems (Publicador)

Representa os itens em um controle de caixa de listagem da Web.

Comentários

Use a propriedade ListBoxItems do objeto WebListBox para acessar os itens em uma caixa de listagem da Web.

Use o método AddItem para adicionar itens a uma caixa de listagem da Web.

Exemplo

Este exemplo cria uma nova caixa de listagem da Web e adiciona vários itens a ela. Observe que, quando criado inicialmente, um controle de caixa de listagem da Web contém três itens padrão. Este exemplo inclui uma rotina que exclui os itens de caixa de listagem padrão antes de adicionar novos itens.

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étodos

• AddItem
• Delete
• Item
• Selected

Propriedades

• Application
• Count
• Parent

Confira também

• Referência do modelo de objeto do editor

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.