Bonjour,
 
j'aimerai pouvoir tester dans une macro si un boutton radio (optionbutton) est coché ou non.
Je précise que je n'ai pas créé de userform. J'ai directement disposé une série de bouton radio dans une zone de groupe sur ma feuille de calcul.
Je n'arrive pas à trouver la bonne syntaxe...
 
J'ai essayé des trucs du style :
 
  if sheets("Feuil1" ).optionbutton("casdoption5" ).value = true then
     .....
  endif
 
Mais la syntaxe est incorrecte...
 
Si quelqu'un a une idée, elle est la bien venue
 
Merci d'avance.

Bonjour,
 
Une solution:
 
IF ActiveSheet.OLEObjects("NomDuBoutton" ).Object.Value = true Then....
 
I.

Bonjour Itawa merci de ta réponse.
Désolé de ne pas avoir répondu plus tôt, je suis tombé balade.
 
J'ai essayé ta syntaxe mais sans succès. J'obtiens l'erreur "Impossible de lire la propriété OLEObjects de la classe WorkSheet".
 
Si tu as une autre idée...
 
A+

Bonjour,
 
Tu utilises probablement un option button de la form toolbar et non de la control toolbox (j'ai pas les noms en francais).
 
Dans ton cas je vois trois solutions:
- tu lies ton option box a une cellule et tu fait un test a partir du contenu de cette cellule
- tu utilises cette macro (j'ai pas trouver mieux, et ca me semble etre un peu du bricolage):
 
'<<<La selection semble obligatoire>>>
ActiveSheet.Shapes("Option Button 1" ).Select
 
'<<<-4146 pour une option button non coche, 1 s'il est coche>>>
If Selection.Value = -4146 Then '<<Ton Code
 
- Ce qui me semble etre la meilleure, tu utilises un control activex a partir de la control toolbox, qui te donne beaucoup plus de flexibilite.
 
I.

Merci Itawa,
 
J'ai lié mon option box à une cellule. C'est effectivement beaucoup plus simple comme ça.
 
Encore merci
 
A+