dim i as long, nbl as long ' definition des variables
nbl = range("A65000").end(xlup).row ' recupere le n° de la derniere ligne d'un tableau
for i = 1 to nbl ' Pour i commencant à 1 jusqu'à nbl (fin de tableau)
' i est le n° de ligne à traiter
next i ' traiter le prochain i si i> nbl alors tout est traité, ca sort automatiquement