CheckBox dans une boucle

Résolu
Gaut -  
 Gaut -
Bonjour, j'ai placé mes CheckBox (sur le tableur Excel) dans une boucle VBA comme suit :

For i=0 To 4

If FeuilX.CheckBox(2*i+1).value then
.....
If Feuilx.CheckBox(2*i+2).Value Then
.....
Next

Mais ca ne marche pas. Qlq'un sait il pq?
Merci

2 réponses

m@rina Messages postés 26524 Date d'inscription   Statut Contributeur Dernière intervention   11 490
 
Bonjour,

En dehors du fait que Value n'est pas testé, un objet CheckBox de feuille ne s'utilise pas comme ça.

Essaie plutôt :

For x = 1 To 4
If ActiveSheet.OLEObjects("checkbox" & x).Object.Value = True Then
.........
End If
Next

1
Gaut
 
Grand merci Marina, plus de problème dans ma boucle...
0
superip79
 
Bonjour,

Un "if" est utilisé pour tester une condition, or là dans ton code il n'y a aucune condition.
Il faut donc rajouter un truc du style :
if FeuilX.CheckBox(2*i+1).value = 45 then

Ciao
0