Excel VBA Option Badges

Si vous avez plusieurs boutons d'option, vous ne pouvez en sélectionner qu'un seul. Créer boutons d'option dans Excel VBA, exécutez les étapes suivantes.

1. Sous l'onglet Développeur, cliquez sur Insérer.

2. Dans le groupe Contrôles ActiveX, cliquez sur Bouton d'option.

3. Faites glisser deux boutons d’option sur votre feuille de calcul.

4. Cliquez avec le bouton droit sur le premier bouton d'option (assurez-vous que le mode Conception est sélectionné).

5. Cliquez sur Afficher le code.

Remarque: vous pouvez modifier la légende et le nom d'un contrôle en cliquant avec le bouton droit de la souris sur le contrôle (assurez-vous que Mode Création est sélectionné), puis en cliquant sur Propriétés. Modifiez les légendes des boutons d'option en Femme et Homme. Pour l'instant, nous laisserons OptionButton1 et OptionButton2 en tant que noms des boutons d'option.

6. Ajoutez la ligne de code suivante:

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

7. Cliquez avec le bouton droit sur le deuxième bouton d'option (assurez-vous que le mode Conception est sélectionné).

8. Cliquez sur Afficher le code.

9. Ajoutez la ligne de code suivante:

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

10. Cliquez sur les boutons d'option de la feuille (assurez-vous que le mode Conception est désélectionné).

Résultat:

Bien que dans certaines situations, il puisse être utile de placer directement des boutons d'option sur votre feuille de calcul, ils sont particulièrement utiles lorsqu'ils sont placés sur un Userform.