Veri Girilen En Son Satırdan Yukarıya Doğur Satırları Sildirmek?

[cenga03]

Merhaba

Ekteki dosyada en son veri olan satırdan 4:4 başlayarak geriye doğru sildirmek için bir makro deniyorum ama bir türlü beceremedim. Yardımlarınız için şimdiden teşekkürler.

 

[Emir Hüseyin Çoban]

. . .

Sub kod()

SONSATIR = [A65536].End(3).Row

For i = SONSATIR To 2 Step -1
Rows(i).Delete
Next i

End Sub

. . .