Récuperer valeur OptionButton

Bonjour à tous,

J'ai insérer dans un document excel 2 bouton case d'option (activex), et je voudrait savoir comment vérifier la valeur en VBA.

Exemple Si bouton "compta" choisit alors cela execute telle code VBA sinon si c'est "comm" alors c'est ce code si etc...

j'ai testé avec un seul bouton que je n'ai pas renommé:

Code:

---

1 2 3 4

If OptionButton1.Value = True Then MsgBox ("ok") End If

---

J'ai l'erreur==> Erreur 424 :Objet requis

Quelle erreur est-je commis?

guigui69

Bonjour,

pour moi, l'erreur se trouve au niveau du msgbox

pour afficher un messagebox sans récupération de la réponse

Code:

---

MsgBox "ok"

---

Pour tester Si la réponse à la msgbox est oui

Code:

---

1 2 3

If MsgBox("oui ou non?", vbYesNo, "Attente réponse") = vbYes Then MsgBox "traitement oui" End If

---

EDIT : oups, ça fonctionne aussi avec les parenthèses :aie:

Ou est placé ton code? dans la feuille ou se trouve les objets?

Merci mais c'est le msgbox le problème.

C'est au niveau du optionbutton.

Je me suis peut etre (surment) mal prit.

J'ai juste créé ces 2 boutons, et j'ai de récupérer la valeur en VBA.

Ou est mon erreur?

guigui69

Bonjour,
Les trois lignes que tu montres semblent correctes.
L'objet ActiveX OptionButton et le code VBA se trouvent ils bien dans le même Objet feuille ?
Comment enclenches tu cette procédure ?

Pense à préciser soit ta feuille soit ton userform

Code:

---

1 2 3

If USERFORM1.OptionButton1.Value = True Then MsgBox "ok" End If

---