Si usted tiene más de un botón de opción, sólo uno de los botones de opción se puede seleccionar. Para crear botones de opción en Excel VBA, ejecute los siguientes pasos.

  1. En la ficha Programador, haga clic en Insertar.

  2. En el grupo Controles ActiveX, haga clic en botón de opción.

Create an option button in Excel VBA

  1. Arrastre dos botones de opción en la hoja de trabajo.

  2. Haga clic derecho en el primer botón de opción (asegúrese de que el modo de diseño se selecciona).

  3. Haga clic en Ver código.

View Code

Nota: se puede cambiar el título y el nombre de un control haciendo clic derecho sobre el control (Asegúrese de haber seleccionado el modo de diseño) y luego hacer clic en Propiedades. Cambie los títulos de los botones de opción a la hembra y macho. Por ahora, vamos a dejar OptionButton1 y OptionButton2 como los nombres de los botones de opción.

  1. Añadir la siguiente línea de código:

If OptionButton1.Value = True Then Range("D3").Value = 10

  1. Haga clic derecho en el segundo botón de opción (asegúrese de que el modo de diseño se selecciona).

  2. Haga clic en Ver código.

  3. Añadir la siguiente línea de código:

If OptionButton2.Value = True Then Range("D3").Value = 20

  1. Haga clic en los botones de opción en la hoja (asegúrese de que el modo de diseño no está seleccionada).

Resultado:

Option Button 1 True

Option Button 2 True

Aunque en algunas situaciones puede ser útil directamente opción Colocar botones en la hoja de trabajo, botones de opción son particularmente útiles cuando se coloca en un formulario de usuario.