Case d'option activable sous condition

Bonjour à tous

Je souhaite créer un formulaire ou l'utilisateur pourra opter entre plusieurs options (1 seule pouvant être activée), sachant que les options sont conditionnées.

J'ai créé des case d'option mais je désespère .... comment faire pour qu'elles ne puissent être sélectionnables que si une condition préalable est remplie ?????

J'ai joint un exemple pour que ça soit plus simple.

J'ai bien essayé le code suivant mais cela ne fonctionne pas

Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Address = "$C$6" Then

If UCase(Target) = 1 Then ActiveSheet.Shapes.Range(Array("Option Button 4")) = True

End If

End Sub

Merci d'avance de votre aide

Bonjour jcn,

Tu utilises des optionbutton de type "contrôle de formulaire", sauf erreur de ma part, on ne peut pas obtenir ce que tu souhaites.

En revanche, si tu utilises des optionbutton de type "contrôle active x", tu peux utiliser l'option "enabled" qui figure dans les propriétés de ton bouton.

Un exemple ci-joint : si cellule en jaune <>1 alors impossible de cocher l'optionbutton correspondant.

Cordialement,

Une petite correction.....si case en jaune<>1, case décochée en plus du verrouillage...

En espérant que cela t'aide,