Ecriture dans la dernière cellule vide d'une plage

Bonjour,

Je cherche à écrire dans la dernière cellule d'une plage donnée. J'ai trouvé le code pour écrire cela sur toute une feuille mais pas sur un plage.

Actuellement j'ai écris cela mais ça ne fonctionne pas :

La plage dans laquelle je cherche faire la recherche puis l'écriture se trouve entre la colonne A et BL sans être limitée en ligne.

ligne = Worksheets("Gasmix_clients").Range("A" & Rows.Count).End(xlUp).Row + 1
Worksheets("gasmix_clients").Cells(ligne, 1).Value = Me.sn_appareil
colonne = Worksheets("gasmix_clients").Range("A1:BL50000").Cells(ligne, Cells.Columns.Count).End(xlToLeft).Column + 1
Worksheets("gasmix_clients").Cells(ligne, colonne).Value = SN_date_voie1
Worksheets("gasmix_clients").Cells(ligne, colonne + 2).Value = 1
Worksheets("gasmix_clients").Cells(ligne, colonne + 3).Value = Me.voie1

l'écriture se fait bien mais la recherche est faite sur toute la feuille et non sur la plage A:BL et j'ai une colonne avec des données en BZ.

Merci d'avance pour l'aide!

Bonjour,

Peut-être ceci, pour la recherche de la dernière colonne:

colonne = Worksheets("gasmix_clients").Range("ZZ1")).End(xlToLeft).Column + 1

Cdlt