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

  1. m@rina Messages postés 27551 Date d'inscription   Statut Modérateur Dernière intervention   11 562
     
    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. Gaut
       
      Grand merci Marina, plus de problème dans ma boucle...
      0
  2. 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