Cómo crear formularios interactivos en Excel VBA con controles ActiveX

4. Casilla de verificación

Check Box es un control que permite al usuario seleccionar la opción Ya/Tidak o True/False. Esto es útil para entradas binarias como la confirmación de consentimiento, la selección de características o la activación/desactivación de una función en un formulario.

Usar la casilla de verificación para guardar valores verdaderos/falsos

Para agregar un Check Box en Excel VBA, siga estos pasos:

1. Abra la  pestaña Developer en Excel.
2. Haga clic en Insert > Check Box (ActiveX Controls).
3. Haga clic y arrastre para colocar el Check Box en la hoja de trabajo.
4. Haga clic derecho en Check   Box > Properties.

Ejemplo de código VBA para conectar una casilla de verificación con una celda

Para Check Box almacenar valores en celdas en función de su estado, use el siguiente código:

If CheckBox1.Value  = True Then
  Range(“D2”).Value  1
Else
  Range(“D2”).Value = 0
End If

Este código rellenará D2 celdas con 1 si el Check Box está marcado y 0 si no está marcado.

Para que esta función se ejecute automáticamente cuando el usuario haga clic en Check Box, use event Change dentro del VBA Editor:

Private Sub CheckBox1_Click()
  If CheckBox1.Value =True Then
  Range(“D2”).Value  1
  Else
  Range(“D2”).Value = 0
  End If
End Sub

5. Botones de opción

Tanto Check Box como Option Buttons se utilizan para proporcionar opciones a los usuarios, pero existen diferencias importantes entre los dos:

Si el usuario necesita seleccionar más de una opción, use Check Box. Sin embargo, si solo puede elegir una de varias opciones, use Option Buttons.

Pasos para crear un botón de selección en Excel VBA

1. Abra Excel y habilite la  pestaña Developer.
2. Seleccione Developer > Insert > Option Button (ActiveX Controls).
3. Haga clic y arrastre para colocar dos Option Buttons en la hoja de trabajo.
4. Haga clic con el botón derecho en cada Option Button y luego seleccione Properties.
   • Cambie el nombre de (Name) a OptionButton1 y OptionButton2.
   • Cambie el Caption a “Hombre” para OptionButton1 y “Mujer” para OptionButton2.
5. Para agrupar los dos botones, colóquelos en Frame (ActiveX Controls) o en el UserForm.

Ejemplo de código VBA para conectar teclas selectoras con celdas

El siguiente código almacenará una selección del Option Button en la celda D3 de acuerdo con la elección del usuario:

If OptionButton1.Value =True Then Range(“D3”).Value “Male”
If OptionButton2.Value  =True Then Range(“D3”).Value “Female”

Para asegurarse de que este código se ejecuta automáticamente cuando el usuario hace clic en el botón, use los siguientes eventos de VBA:

Private Sub OptionButton1_Click()
   Range(“D3”).Value =“Male”
End Sub

Private Sub OptionButton2_Click()
  Range(“D3”).Value =“Female”
End Sub

Con este código, D3 celdas se actualizarán automáticamente de acuerdo con las elecciones realizadas por el usuario.