Objeto WebListBoxItems (Publisher)

Representa os itens num controlo de caixa de listagem Web.

Comentários

Utilize a propriedade ListBoxItems do objeto WebListBox para aceder aos itens numa caixa de listagem Web.

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

Exemplo

Este exemplo cria uma nova caixa de listagem Web e adiciona vários itens à mesma. Tenha em atenção que, quando criado inicialmente, um controlo de caixa de listagem Web contém três itens predefinidos. 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 Publisher

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.