Option button et plusieurs conditions

Bonjour à tous !

Voici ce que j'aimerais faire :

dans une feuille 2 optionbuttons

Si optionbutton1 est sélectionné et si A1 > B1 et si A1 < C1 alors lancé macro1

Si optionbutton1 est sélectionné et si A2 > B2 et si A2 < C2 alors lancé macro2

Si optionbutton2 est sélectionné et si A3 > B3 et si A3 < C3 alors lancé macro3

Si optionbutton2 est sélectionné et si A4 > B4 et si A4 < C4 alors lancé macro4

Quel serait le code svp?

Cordialement

Bonjour,

Le lancement de la procédure est réalisé par un bouton de commande.

Tous les contrôles sont des ActiveX.

Private Sub CommandButton1_Click()
    'Si optionbutton1 est sélectionné
    If OptionButton1.Value = True Then
        'si A1 > B1 et si A1 < C1 alors lancer macro1
        If Range("A1") > Range("B1") And Range("A1") < Range("C1") Then
            Macro1
        'si A2 > B2 et si A2 < C2 alors lancer macro2
        ElseIf Range("A2") > Range("B2") And Range("A2") < Range("C2") Then
            Macro2
        End If
    'Si optionbutton1 est sélectionné
    ElseIf OptionButton2.Value = True Then
        'si A3 > B3 et si A3 < C3 alors lancer macro3
        If Range("A3") > Range("B3") And Range("A3") < Range("C3") Then
            Macro3
        'si A4 > B4 et si A4 < C4 alors lancer macro4
        ElseIf Range("A4") > Range("B4") And Range("A4") < Range("C4") Then
            Macro4
        End If
    End If
End Sub

A+

bonjour et merci Frangy de ton travail.

c est suer sympa

Merci beaucoup

bonne continuation

cordialement

Rechercher des sujets similaires à "option button conditions"