Son dolu satırı sil

[ziya]

Merhaba,
Son dolu satırı sil makrosu yazamadım.
Yardım rica ediyorum.

 

[Feylosof]

merhaba dener misiniz

Sub test()
son = Cells(65536, "A").End(xlUp).Row
Rows(son).Delete
End Sub

 

[ziya]

Teşekkür ederim.

 

[Feylosof]

Ben teşekkür ederim.