Verifier qu'une case d'option est cochée!

Bonjour,

Voila je pense que le titre est assez explicite en soit :)
JHe cherche à determiner si une case d'option placé sur un classeur est cochée ou non. Je pensais faire quelque chose de ce style mais cela ne fonctionne pas :/

Code:

---

1 2	If .Shapes("Case d'option 1").Fill = True Then

---

Voila je ne pense pas que ce soit un probleme d'une difficulté folle mais je ne trouve pas à partir de google :s


Chipss

Bonjour,

Pour utiliser des boutons d'option dans le code, le plus simple est d'utiliser les objets de la boite a outil du menu visual basic. (Plus simple d'utilisation)

Les objets "Formulaire" étant surtout faite pour lié une macro directement

bonjour,
je suis d'accord avec jfontaine, les options buttons sont plus facile à utiliser que les case d'option même si elle font la même chose, toutefois tu peux essayer ceci:
en admettant que dans une feuille appelée "feuil1" tu as deux case d'option respectivement case d'option 1 et case d'option 2 :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

Sub Test_case_option()   With Sheets("Feuil1")   Select Case xlOn   Case .OptionButtons(1).Value MsgBox "case 1 sélectionnée"   Case .OptionButtons(2).Value MsgBox "case 2 sélectionnée"   Case Else MsgBox "Aucune case sélectionnée"   End Select End With   End Sub

---