Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Representa los elementos de un control de cuadro de lista web.
Comentarios
Use la propiedad ListBoxItems del objeto WebListBox para tener acceso a los elementos de un cuadro de lista web.
Use el método AddItem para agregar elementos a un cuadro de lista web.
Ejemplo
En este ejemplo se crea un nuevo cuadro de lista web y se le añaden varios elementos. Tenga en cuenta que, cuando se crea inicialmente, un control de cuadro de lista web contiene tres elementos predeterminados. En este ejemplo se incluye una rutina que elimina los elementos de cuadro de lista predeterminados antes de agregar los elementos nuevos.
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
Propiedades
Vea también
Soporte técnico y comentarios
¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.