Soru Belirli sütunların dolu olan son satırlarındaki hücre içeriğini silme(satır silinmeyecek)

[av.akpinar]

D ve E sütunlarının dolu olan son satırındaki hücre içeriğini silmek için formül yazmaya çalışıyorum, çalıştıramadım ben, yardımcı olur musunuz


Sub Düğme4_Tıklat()
son = Sheets("GELİR PAYLAŞTIRMA TABLOSU").Cells(Rows.Count, "D" & "E" ).End(3).Row
Sheets("GELİR PAYLAŞTIRMA TABLOSU").Range(Cells(son, "D"), Cells(son, "E")).ClearContents
End Sub

 

[ÖmerFaruk]

Sub SonSatırlarıSil()
Sheets("GELİR PAYLAŞTIRMA TABLOSU").Range("D" & Rows.Count).End(xlUp).ClearContents
Sheets("GELİR PAYLAŞTIRMA TABLOSU").Range("E" & Rows.Count).End(xlUp).ClearContents
End Sub

 

[av.akpinar]

Teşekkür ederim üstat, çok sağolun

 

[ÖmerFaruk]

Rica ederim.
Bazı basit kalıpları, sıkça kullanarak ve pratik yaparak el alışkanlığı kazanmanızı tavsiye ederim.
Kolay gelsin.