Makro Özel Sıralama Kodu

[ramazankaya89]

Arkadaslar ıyı aksamlar

Sayfa3 D sütununa göre Hücre değerlerini A'dan Z'ye sıralamak ıcın asagıdakı kodu yazdım ama hata alıyorum.

Son_Satır = Sayfa3.Range("D2").End(xlDown).Row
Sayfa3.Range("A1" & Son_Satır).Sort key1:=Range("D2"), order1:=xlAscending, Header:=xlYes

Not : A sütunundan P sütunu dahil sayfada veriler mevcut bazı hücrelerde bosluklarda olabılıyor her ne olursa olsun D sutununa gore satırları sıralamasını saglamam gerekıyor D sutununda hıc bır bosluk olmayacaktır.

yardımlarınızı rıca ederım.

 

[veyselemre]

    Son_Satır = Sayfa3.Range("D2").End(xlDown).Row
    Sayfa3.Range("A1:P" & Son_Satır).Sort key1:=Sayfa3.Range("D1"), order1:=xlAscending, Header:=xlYes

 

[ramazankaya89]

Tesekkurler