Case d'option

Désolé mais je n'y arrive pas, j'ai mis un exemple en dessous avec 4 boutons, je voudrai que le 1 soit avec le 2 et le 3 soit avec le 4, que faut il changer !!!


Private Sub OptionButton1_Click()
If OptionButton1.Value = True Then
'Instructions si l' optionButton1 est activée
Else
'Instructions si l' optionButton2 est activée
End If

End Sub

Private Sub OptionButton2_Click()
If OptionButton2.Value = True Then
'Instructions si l' optionButton2 est activée
Else
'Instructions si l' optionButton1 est activée
End If
End Sub

Private Sub OptionButton3_Click()
If OptionButton3.Value = True Then
'Instructions si l' optionButton3 est activée
Else
'Instructions si l' optionButton4 est activée
End If
End Sub

Private Sub OptionButton4_Click()
If OptionButton4.Value = True Then
'Instructions si l' optionButton4 est activée
Else
'Instructions si l' optionButton3 est activée
End If
End Sub

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

End Sub

Bon j'ai fini enfin par trouver la solution à mon problème !!!!!

Il faut en fait mettre dans Déclaration de la feuille :

OptionButton1.GroupName = "IPPD"
OptionButton2.GroupName = "IPPD"
OptionButton3.GroupName = "RP"
OptionButton4.GroupName = "RP"

Puis dans la propriété de chaque bouton rattacher le groupname à celui que l'on souhaite !!!

Merci à toi Choubaka !!