Combobox
Hola como están?
Yo estoy recuén aprendiendo Visual, igual he hecho algunas macros pero muy simples.
El problema es que ahora necesito aprender a usar los Combobox pero nose como se programan, como se le ponen cosas adentro, me lei el help del visual y ahà và que eso se hacÃa con el "additem", pero nose si se agraga en el mismo combobox().
en verda como que no entiendo
Alguien me puede explicar muyyyy basicamente como se hace un combobox
Yo estoy recuén aprendiendo Visual, igual he hecho algunas macros pero muy simples.
El problema es que ahora necesito aprender a usar los Combobox pero nose como se programan, como se le ponen cosas adentro, me lei el help del visual y ahà và que eso se hacÃa con el "additem", pero nose si se agraga en el mismo combobox().
en verda como que no entiendo
Alguien me puede explicar muyyyy basicamente como se hace un combobox
Si quieres agregar elementos a un combobox lo haces con el método AddItem, algo asÃ:
Combo1.AddItem "Primero"
Combo1.AddItem "Segundo"
Combo1.AddItem "Tercero"
Combo1.AddItem "Cuarto"
Si quieres llenarlo de una tabla pues haces el bucle para usar el AddItem
También lo puedes hacer en tiempo de diseño agregando los elementos en la propiedad List y pasas al siguiente con CTRL+ENTER
Otras propiedades que te pueden servir son:
ListCount: Te devuelve la cantidad de elementos del combo
ListIndex: El Ãndice del elemento seleccionado (comienza en cero). Si no quieres que aparezca seleccionado un elemento en el combo, le das a esta propiedad el valor -1
Si quieres eliminar un elemento del combobox usas el método RemoveItem seguido del Ãndice del elemento, asÃ:
combo1.RemoveItem 3
Eso borra el elemento "Cuarto" del ejemplo anterior (el Ãndice comienza en cero)
combo1.clear
Eso elimina todo el contenido del combo
Si quieres recorrer el combo, puede ser asÃ:
for i = 0 to combo1.listcount - 1
MsgBox Combo1.List(i)next
next
Si quieres saber cuál es el elemento seleccionado, serÃa asÃ:
Combo1.List(Combo1.ListIndex)
Espero que eso te ayude.
Combo1.AddItem "Primero"
Combo1.AddItem "Segundo"
Combo1.AddItem "Tercero"
Combo1.AddItem "Cuarto"
Si quieres llenarlo de una tabla pues haces el bucle para usar el AddItem
También lo puedes hacer en tiempo de diseño agregando los elementos en la propiedad List y pasas al siguiente con CTRL+ENTER
Otras propiedades que te pueden servir son:
ListCount: Te devuelve la cantidad de elementos del combo
ListIndex: El Ãndice del elemento seleccionado (comienza en cero). Si no quieres que aparezca seleccionado un elemento en el combo, le das a esta propiedad el valor -1
Si quieres eliminar un elemento del combobox usas el método RemoveItem seguido del Ãndice del elemento, asÃ:
combo1.RemoveItem 3
Eso borra el elemento "Cuarto" del ejemplo anterior (el Ãndice comienza en cero)
combo1.clear
Eso elimina todo el contenido del combo
Si quieres recorrer el combo, puede ser asÃ:
for i = 0 to combo1.listcount - 1
MsgBox Combo1.List(i)next
next
Si quieres saber cuál es el elemento seleccionado, serÃa asÃ:
Combo1.List(Combo1.ListIndex)
Espero que eso te ayude.
ya gracias te pasaste..
Te voy a contar mi duda especÃfica:
yo tengo una lista de aviones "B737, B767, A320, A340"
esos 4 , estoy haciendo una macro en un User form ()
y yo tenia esta flota de aviones pero en Option Button.
cuando tu selecionabas una se te plasmaba en una celda de una planilla exel.
Ya ... ahora para ahorrar espacio se me ocurrio que podÃa meter esa misma lista de aviones en un Combobox... pero no se como hacerlo.
Mi pregunta es: Como lo puedo hacer para que al hacer clic sobre el boton del combobox se me despliege la lista de esos 4 aviones y que al selecciónar un avoón se me plasme en una celda de una hoja exel...
si me puedes ayudar serÃa buenÃsimo...
Gracias
Te voy a contar mi duda especÃfica:
yo tengo una lista de aviones "B737, B767, A320, A340"
esos 4 , estoy haciendo una macro en un User form ()
y yo tenia esta flota de aviones pero en Option Button.
cuando tu selecionabas una se te plasmaba en una celda de una planilla exel.
Ya ... ahora para ahorrar espacio se me ocurrio que podÃa meter esa misma lista de aviones en un Combobox... pero no se como hacerlo.
Mi pregunta es: Como lo puedo hacer para que al hacer clic sobre el boton del combobox se me despliege la lista de esos 4 aviones y que al selecciónar un avoón se me plasme en una celda de una hoja exel...
si me puedes ayudar serÃa buenÃsimo...
Gracias
Private Sub UserForm_Activate()
ComboBox1.AddItem "B737"
ComboBox1.AddItem "B767"
ComboBox1.AddItem "A320"
ComboBox1.AddItem "A340"
End Sub
Private Sub ComboBox1_Click()
Worksheets("Hoja1").Cells(1, 1) = ComboBox1.List(ComboBox1.ListIndex)
End Sub
ComboBox1.AddItem "B737"
ComboBox1.AddItem "B767"
ComboBox1.AddItem "A320"
ComboBox1.AddItem "A340"
End Sub
Private Sub ComboBox1_Click()
Worksheets("Hoja1").Cells(1, 1) = ComboBox1.List(ComboBox1.ListIndex)
End Sub