Re : Lettrage automatisé avec Excel 2003
Bonjour !
Je vous remercie pour vos contributions.
Ce forum est génial.
J'ai une question : en exécutant la macro qui se trouve dans Exceli LETTRAGE, il s'avere que la macro bug au bout d'un certain moment. En particulier lorsqu'il y a trop de ligne par exemple (N'étant pas un pro du VBA, ce sont des suppositions). Pouvez-vous m'aider svp ?
Il s'agit d'une erreur d’exécution '5' : Argument ou appel de procédure incorrect (le champ surligné en jaune est le "Next i" en gras)
Voici le code :
Private Sub CommandButton1_Click()
Range("I11").Resize(UsedRange.Rows.Count, 1).ClearContents: Dim d As New CDonnees
For i = 11 To Range("B65000").End(xlUp).Row: d.Add Range("D" & i), Range("D" & i), Range("K" & i), Range("F" & i), Range("G" & i), i: Next i
d.Lettrer
For i = 11 To Range("B65000").End(xlUp).Row: Range("I" & i) = d.Lettrage(Range("D" & i), Range("D" & i), Range("K" & i), Range("F" & i), Range("G" & i), i): Next i
End Sub
Merci par avance