Controles ActiveX: Cuadro de Lista (Programando Código VBA Parte 1)

Ahora veamos cómo aplicar un poco de código VBA sobre el control ActiveX Cuadro de Lista. Estando en Modo Diseño, damos clic derecho sobre el control y seleccionamos la opción Ver código. Con esto se abre el editor de VBA:

En el cuadro de Objetos marcado en Rojo tenemos ListBox1 que es el nombre interno que tiene el Cuadro de Lista. En el cuadro de Eventos marcado en Azul tenemos el evento Click que corresponde al evento dar Clic; esto indica que la macro que ingresemos, se ejecutará una vez demos clic en el cuadro de lista (ListBox1).

Al ingresar a esta ventana de código del Cuadro de Lista, Excel agrega por defecto el código de inicio y de fin de la macro que se ejecutará desde dicho control. Lo podemos ver en la parte blanca de la derecha del Editor de Visual Basic:

  1. Private Sub ListBox1_Click(): Es la línea inicial de la macro, indica que tenemos una Subrutina (Private Sub) que se asocia para el control Cuadro de Lista (ListBox1) y se ejecutará una vez se dé clic sobre dicho control
  2. End Sub: Es la línea que marca el fin de la macro o de la Subrutina (End Sub)

Significa entonces que el código que ingresemos ENTRE estas dos líneas es el que se ejecutará una vez se dé un Clic sobre el control Cuadro de Lista 1 (ListBox1).

Veamos el listado de Eventos que tenemos a disposición de este control. Para ello, damos clic en la pestaña del cuadro de eventos:

Vemos que podemos ejecutar una macro ya sea en el evento antes de realizar la acción de Copiar o de Pegar, o al dar clic en otra parte de la hoja Excel que no sea el control o doble clic. Para nuestro ejemplo vamos a ejecutar una macro para el evento Click y el código a ejecutar es el siguiente:

MsgBox "Has seleccionado al vendedor " & ListBox1.Value

Lo que estamos programando es un mensaje que muestra el texto “Has seleccionado al vendedor “ y lo empatamos o concatenamos con la propiedad valor (Value) del cuadro de lista (ListBox1)

Ahora vamos a la hoja Excel, desactivamos el Modo Diseño y vamos a probar el control:

Descargar archivo de trabajo.

MÁS SOBRE

Gerencie.com en su correo.

Suscríbase y nosotros colocaremos en su bandeja de entrada la mejor información que generamos diariamente.

Siéntase libre de opinar

En Gerencie.com está permitido opinar, criticar, discutir, controvertir, disentir, etc. Lo que no está permitido es insultar o escribir palabras ofensivas o soeces. Si lo hace, su comentario será rechazado por el sistema o será eliminado por el administrador. Por último, trate de no escribir en mayúscula sostenida, resulta muy difícil leerle.