J'ai créé une boucle dans une autre boucle.
En avançant petit à petit (touche F8), ma boucle marche très bien mais en la lançant, il me semble qu'elle loupe pas mal de valeurs, est-ce normal? (lol..)
Mes boucles :
Worksheets(ClasseName).Activate
Module = Cells(5, 6)
Nb_Lignes6 = Range("A65536").End(xlUp).Row
For f = 10 To Nb_Lignes6
ID = Cells(f, 7)
Sheets("suivis").Activate
Nb_Lignes7 = Range("A65536").End(xlUp).Row
For g = 2 To Nb_Lignes7
If Cells(g, 1) = ID Then
If Cells(g, 2) = Module Then
Worksheets(ClasseName).Activate
Cel = Cells(f, 4)
If Cel = "" Then
Cells(f, 4) = "(2x)"
Else
Cells(f, 4) = Cel & " (2x)"
End If
End If
End If
Next g
Next f
Nb_lignes6 vaut environ 15 et Nb_lignes7 25'000
Déjà eu un problème similaire?
Personnellement je suis impressionné par la vitesse à laquelle le programme passe les 25'000 entrées (même pas 10 secondes..), donc le problème vient peut-être de mon code, mais après l'avoir relu une vingtaine de fois je ne vois toujours pas l'erreur...
Bonne journée et merci pour votre réponse
