Visual Basic

 Control Option Button

El OptionButton en VBA es un control ActiveX que nos permitirá seleccionar una sola alternativa dentro de un grupo de botones de opción. A diferencia de las casillas de verificación, los botones de opción dependen uno del otro, por esto solo puede estar seleccionado un solo botón de opción.

Insertar un OptionButton:

Para insertar un botón de opción hacemos clic en el comando Insertar de la ficha Programador y luego seleccionar el “Botón de opción (control ActiveX)”

Se deberá agregar dos o más botones de opción para permitir que el usuario haga una selección de cualquiera de ellos.

Propiedad Value del OptionButton:

Esta es la propiedad más importante de este control. Los valores que puede tener la propiedad Value son de tipo boolean (Verdadero - Falso) es decir True y False.

Ejemplo 1:

Insertando 3 veces la alternativa “Botón de opción (control ActiveX)” y luego modificando el valor de “Caption” (cambiándolo por el nombre deseado, para este caso Opción 1, Opción 2 y Opción 3) en cada una de ellas al ingresar a sus propiedades se obtendrá:

En el código VBA podemos acceder a su propiedad Value y modificarla de la siguiente manera:

Private Sub OptionButton1_Click()
'Si está seleccionado el Option1 se ejecuta
If OptionButton1.Value = True Then MsgBox ("Has seleccionado la Opción 1")
End Sub

Private Sub OptionButton2_Click()
'Si está seleccionado el Option2 se ejecuta
If OptionButton2.Value = True Then MsgBox ("Has seleccionado la Opción 2")
End Sub

Private Sub OptionButton3_Click()
'Si está seleccionado el Option3 se ejecuta
If OptionButton3.Value = True Then MsgBox ("Has seleccionado la Opción 3")
End Sub

Private Sub CommandButton1_Click()
UserForm1.Show
End Sub

En este Ejemplo 1 al validar que el botón de opción está seleccionado, se mostrará un cuadro de diálogo al ejecutar la función MsgBox mostrando un mensaje con la Opción que se eligió.

Propiedad Style:

Aplica el estilo al option button.

Ejercicio:

ANTERIOR