Bonjour,

Soit la lettre de la colonne entre guillemets

Do While Not IsEmpty(Cells(i, "A"))

Soit l'index de la colonne

Do While Not IsEmpty(Cells(i, 1))