Macro garder une cellule en mémoire

Bonjour, je viens vers vous car je rencontre un problème avec une macro.

En effet cette macro (un fichier exemple est joint) permet de "figer" la colonne L et M à savoir faire un copier coller spécial (Valeur) pour qu'une fois la formule utilisée seul la valeur reste et non pas la formule.

Voici la macro :

Sub FigerHT()

Dim cpt As Integer

cpt = 3

 Sheets("Feuil1").Select

    Do While Range("L" & cpt) <> ""

      Range("L" & cpt).Select
      Selection.Copy
      Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
      :=False, Transpose:=False
      cpt = cpt + 1

    Loop
End Sub

Donc à chaque fois que j’exécute la macro il commence de la cellule L3 et vas faire le bas jusqu'à rencontrer une cellule vide. Il y a t-il une façon pour qu'il garde en mémoire la dernière cellule à laquelle la formule a été appliquée (par exemple L36) pour que la prochaine fois il ne commande qu'à L37.

Merci

Pour information j'ai trouvé la solution en mettant dans une cellule la valeur de la ligne concernée et en la récupérant dans la variable cpt