Re,
For i = 4 To Range("G65535").End(xlUp).Row
Dans ce cas, I est une variable qui prendra les valeurs successives de 4 ( valeur de la ligne de départ)
jusqu'à
la ligne de la dernière cellule non-vide en colonne G (valeur de la ligne d'arrivée)
Cells(i,14) ---> cellule en ligne I et 14ème colonne
Cells(i,13) ---> cellule en ligne I et 13ème colonne
Cells(i,7) ---> cellule en ligne I et 7ème colonne
à+
Philippe