Excel Avanzado

Macros, Vba en Excel y muchos ejemplos de nuestro Curso de Excel Avanzado

Excel Avanzado
Elementos Combobox, Ejemplo de adición y eliminación de elementos de un Combobox

Ejemplo de adición y eliminación de elementos de un Combobox

| 4 comentarios

El control del ComboBox se usa para añadir elementos al cuadro de combinaciones y para que el usuario pueda elegir entre ellas. Dependiendo del valor (si está activo o no) se realiza una acción u otra.

Ejemplo: Un ejemplo que involucre la adición y eliminación de elementos seria en una situación en la que un cine tiene que poner en su cartelera las películas de la semana. Los títulos de las películas van cambiando cada semana por ello creamos el siguiente procedimiento en un formulario:

Private Sub UserForm_Activate()
ult = Cells(Rows.Count, 1).End(xlUp).Row
For i = 1 To ult
ComboBox1.AddItem (Cells(i, 1))
Next
End Sub

Private Sub CommandButton1_Click()
TextBox1.Text = ComboBox1.Value
End Sub

Este código permite que cuando se agregan o se quitan películas en la hoja excel, inmediatamente  se añade o se elimina del cuadro de combinaciones. Como se muestra:

ANTES:

Captura 1 300x92, Ejemplo de adición y eliminación de elementos de un Combobox
Captura2, Ejemplo de adición y eliminación de elementos de un Combobox

DESPUÉS: (Se ha eliminado una película y se ha puesto otra)

Elementos Combobox 3 300x254, Ejemplo de adición y eliminación de elementos de un Combobox

 

Elaborado por: Juan Carlos Castillo 

4 comentarios

Deja una respuesta

Los campos requeridos estan marcados con *.