Arrêt d'une macro de transfert

Bonjour,

Je dispose dans le fichier en PJ d'une macro pour transférer des données d'une feuille à l'autre.

Je n'arrive pas à trouver pour que le transfert s'arrête dès qu'une ligne de la colonne A est vide sachant que dispose d'une formule en A12,A13,A14,A15,... qui doit rester.

Si quelques uns ou unes auraient des idées je suis preneur.

Merci par avance de la bienveillance que vous porterez à mon problème

Bonjour

For i = 4 To Range("A" & Rows.Count).End(xlUp).Row
    mot = Range("A" & i).Value

    If mot <> "" Then

        lgn = Sheets("Archive récapitulatif").Range("B" & Rows.Count).End(xlUp)(2).Row
        Range("A" & i & ":K" & i).Copy Sheets("Archive récapitulatif").Range("B" & lgn)
        Range("G1").Copy Sheets("Archive récapitulatif").Range("C" & lgn)
        End If
    Next i

Je teste le contenu de la cellule indépendamment de la formule qu'elle contient. Cela te convient-il ?

Cordialement

Jacky

Bonjour Jacky,

Merci pour cette solution, à première vue elle me convient.