Controles ActiveX: Cuadro Combinado (Programando Código VBA)

Ahora veamos cómo aplicar un poco de código VBA sobre el control ActiveX Cuadro Combinado. 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 ComboBox1 que es el nombre interno que tiene el Cuadro Combinado. En el cuadro de Eventos marcado en Azul tenemos el evento Change que corresponde al evento Cambio; esto indica que la macro que ingresemos, se ejecutará una vez se dé un cambio en el Cuadro Combinado.

Al ingresar a esta ventana de código del Cuadro Combinado, 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 ComboBox1_Change(): Es la línea inicial de la macro, indica que tenemos una Subrutina (Private Sub) que se asocia para el control Cuadro Combinado (ComboBox1) y se ejecutará una vez se dé un cambio 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 Combinado (ComboBox1).

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 o doble clic entre otros. Para nuestro ejemplo vamos a ejecutar una macro para el evento Change y el código a ejecutar es el siguiente:

MsgBox "Has seleccionado al vendedor " & ComboBox1.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 Combinado (ComboBox1)

Con esto queda lista la programación del primer cuadro combinado, ahora copiemos el mismo código para el segundo cuadro combinado; para ello damos clic derecho sobre este segundo control y seleccionamos Ver código y pegamos:

MsgBox "Has seleccionado el vendedor " & ComboBox2.Value

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

Una opinión
  1. Edy Stalling dice:

    Saludos. antes que nada felicitaciones por la ayuda que proporcionan a todos.
    una consulta sobre el cuadro combinado activex. y es como hacer para que cuando lo que buscamos es un nùmero, pero al pasarlo a la celda de destino este no tenga formato de texto. ya que eso me representa un problema al querer usar formulas como BUSCARV. gracias.

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.