CheckBox dans une boucle

Résolu
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

  • Votes
  • Date
  • Date décroissante
  1. Modérateur
    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. Grand merci Marina, plus de problème dans ma boucle...
  2. 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