Trouvé il fallait tout simplement mettre :
Private Sub OptionButton5_Click()
Feuil2.OptionButton5.Value = True
Feuil2.OptionButton6.Value = False
End Sub
Private Sub OptionButton6_Click()
Feuil2.OptionButton5.Value = False
Feuil2.OptionButton6.Value = True
End Sub
Et ne pas oublier de mettre les optionbutton en mode activex dans la feuille et de les renommer comme ses equivalent present dans userform.