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

  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
    1. Grand merci Marina, plus de problème dans ma boucle...
      0
  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
    0