If then sur groupe d'option.

Bonsoir,

J'ai créé un groupe d'option sur lequel je dois inscrire un évènement en fonction de l'option choisie.
Mais quand je tape mon code,

Code:

---

1 2 3 4 5 6 7 8 9

Private Sub Option183_GotFocus() If Me.Option183.Value = True Then Me.Liste191.Visible = True Me.Texte193.Visible = True Me.Texte195.Visible = True Me.Liste201.Visible = False Else blabla.... End If End Sub

---

J'ai une erreur qui bute sur If Me.Option183.Value = True Then (expression sans paramètre).

Je dois encore être à côté de la plaque sur la syntaxe.

merci de m'aider

Bonjour Nessie37 (beau département).

En effet tu as un soucis, je vais essayer de t'expliquer les groupes d'options.

En fait ce n'est pas la valeur du bouton qu'il faut prendre, mais la valeur du groupe d'option.

Celui-ci a plusieurs valeurs en commençant par 1, le premier bouton est le 1, le deuxième le 2 et ainsi de suite.

Il faut donc que tu récupères la propriété value du groupe d'options et non du bouton.

De plus je remarque que tu laisses pour tes contrôles les noms donnés par défaut, hors il faut les renommer pour leur donner un nom clair et compréhensible.
Pour cela je t'invite à lire cet article : http://argyronet.developpez.com/office/vba/convention/

Starec

salut nessie, peux-tu expliquer un peu plus en détail.
Un groupe d'option tu as plusieurs possibilités quand tu le crées : bouton, case à cocher, case d'option. Quand tu crées le groupe, chaque choix par exemple : homme, femme à un numéro (1 et 2). Le code tu dois le faire sur le groupe d'option et non sur le choix de l'option. Je pense que tu as fait un traitement sur l'option.

Après le code est simple (dans VBA le groupe d'option à pour nom par défaut "cadre")

Code:

---

1 2 3 4 5 6 7 8

Private Sub Cadre_Click() if me![cadre] = 1 then 'traitement end if if me![cadre] = 2 then 'traitement end if End Sub

---

Citation:

---

Envoyé par Starec

Bonjour Nessie37 (beau département).

En effet tu as un soucis, je vais essayer de t'expliquer les groupes d'options.

En fait ce n'est pas la valeur du bouton qu'il faut prendre, mais la valeur du groupe d'option.

Celui-ci a plusieurs valeurs en commençant par 1, le premier bouton est le 1, le deuxième le 2 et ainsi de suite.

Il faut donc que tu récupères la propriété value du groupe d'options et non du bouton.

De plus je remarque que tu laisses pour tes contrôles les noms donnés par défaut, hors il faut les renommer pour leur donner un nom clair et compréhensible.
Pour cela je t'invite à lire cet article : http://argyronet.developpez.com/office/vba/convention/

Starec

---

Oui tu le connais bien le 37 je crois ;)

Revenons à nos moutons,
Oui là, le nom par défaut est tel quel car je suis sur un brouillon, copié-collé de ma base propre, en attente de mes modifications.
Je teste ainsi plein de choses, sans craindre de bousiller ma base. Cela fait partie de mon apprentissage sur access.
D'ailleurs j'ai appris plus de choses ici en 4 mois que je n'aurais pu quand j'étais étudiante.
Merci le forum.
Bref, je vais essayer de retaper mon code en fonction de vos lumières.
Bien évidemment vous serez informés.

Merci pour vos lumières à tous les deux !

Rectifié et ça marche (forcément, car ça ne pouvait pas être autrement) :king: