[VBA] Problème d'incrémentation

Résolu
MG -  
 MG -
Bonjour,
Je travail sur un fichier de plus de 20 000 lignes, et à partir de la ligne 9563, je sors de la boucle.
Je ne sais pas du tout pourquoi... 

For Ligne = 0 To DerniereLigne
    For i = 0 To UBound(ListePaysN)
        If ListePaysN(i) = Workbooks(FichierUtilise).Sheets(OngletCA).Cells(Ligne, ColonnePays) Then
            TonnageN(i) = TonnageN(i) + Workbooks(FichierUtilise).Sheets(OngletCA).Cells(Ligne, ColonnePoids)
            CAN(i) = CAN(i) + Workbooks(FichierUtilise).Sheets(OngletCA).Cells(Ligne, ColonneCA)
            NbContratN(i) = NbContratN(i) + 1
            GoTo LigneSuivante
        End If
    Next i
LigneSuivante:
Next Ligne

DerniereLigne = 20 932

Si quelqu'un a une idée (nimporte laquelle), je suis preneur.

Cordialement,

MG

2 réponses

Réponse 1 / 2
MG
 
Un petit up pour la route
0
Réponse 2 / 2
MG
 
Mon problème venait de plus haut dans mon code.
Donc tout est résolu !
0

Discussions similaires

recopier une formule sans décalage
aziz_alg80 -
aziz_alg80 -

2 réponses
"L'indice n'appartient à la sélection" + VBA
fleur.31 -
geosevda -

2 réponses
Erreur d'exécution 13 Incompatibilité de type
grace -
pijaku -

5 réponses
appliquer une pause dans une macro vba excel
ch'duj -
lerif25 -

10 réponses
ouverture d'un fichier excel à partir d'un code VBA
TraderAS -
pijaku -

3 réponses