(13/06/2019, 13:33)nightashes yazdı: 2- Örnek dosyaya bakarsanız...

örnek çalışmanız eklenmemiş görünüyor.
excelde son satır kodu;

Dim SonSatir As Long

    SonSatir = Cells(Rows.Count, 1).End(xlUp).Row