XL pour MAC Modifier sous VBA la case d'option sélectionnée (contrôle de formulaire)

pilote301152 · 5 Novembre 2021

Bonjour,

J'ai 2 cases d'option OUI (nommée OptionOUI) et NON (nommée OptionNON) et je voudrai modifier sous VBA la sélection de l'utilisateur.
Cela revient donc à passer la valeur TRUE à FALSE pour l'une et l'inverse pour l'autre.
J'ai essayé le code suivant mais sans succès
ActiveSheet.Shapes.Range(Array("OptionOUI")) = True
ActiveSheet.Shapes.Range(Array("OptionNON")) = False

Voyez-vous l'erreur ? et une idée de solution ?
Merci d'avance

sylvanu · 5 Novembre 2021

Bonjour Pilote,
Si j'ai bien compris, essayez :

VB:

ActiveSheet.Shapes("OptionOUI").OLEFormat.Object.Value = 1
ActiveSheet.Shapes("OptionOUI").OLEFormat.Object.Value = 0

sylvanu · 5 Novembre 2021

Bonjour Pilote,
Si j'ai bien compris, essayez :

VB:

ActiveSheet.Shapes("OptionOUI").OLEFormat.Object.Value = 1
ActiveSheet.Shapes("OptionOUI").OLEFormat.Object.Value = 0

pilote301152 · 5 Novembre 2021

Merci Sylvanu ta proposition est parfaite et fonctionne sans problème (j'ai modifié la 2° ligne par OptionNON!)

Je ne vois pas comment on fait pour afficher "Résolu" ....

Bon WE

Etoto · 5 Novembre 2021

Bonjour,

Il suffit ce cliquer sur le bouton en forme de vu à droite du post qui vous semble être la solution (dans ce cas, le post 2 serait logiquement la solution).

Bonne fin d'après-midi

pilote301152 · 5 Novembre 2021

Merci Etoto c chose faite
Bon we

XL pour MAC Modifier sous VBA la case d'option sélectionnée (contrôle de formulaire)

pilote301152

XLDnaute Occasionnel

sylvanu

sylvanu

XLDnaute Barbatruc

pilote301152

XLDnaute Occasionnel

Etoto

XLDnaute Barbatruc

pilote301152

XLDnaute Occasionnel

Discussions similaires