Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre questionnbLignes = MaFeuille.Cells(rows.count, "A").end(xlup).row For i = 1 to nblignes Call TraiterFichier(MaFeuille.Range("A" & I)) next
MonTablo = MaFeuille.Range("A1:A" & nblignes).Value Call TraiterFichier(MonTablo)