Sıralama kodları, sıralamayı tam yapmıyor

[İsmail Küçükşengün]

Merhabalar;

Userform üzerindeki Listbox’a sayfadan veriler gelmekte.

Form üzerine koyduğum SIRALAMA butonuyla

2006/564 şeklindeki veriler için

Sheets("liste").Range("a3:cv6000").Sort Key1:=Sheets("liste").Range("O3"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=True, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Kodu yazdım.




15.02.2006 14:15 şeklindeki veriler için de

Sheets("dava").Range("a3:af6000").Sort Key1:=Sheets("dava").Range("T3"), Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=True, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

Kodunu yazdım.

Fakat bu kodlar sıralamayı tam yapmıyor.
Her iki kodda da ne gibi değişiklikler gerekir.

Şimdiden teşekkürlerimle.

 

[mehmett]

Birinci kod O sütununa göre, ikinci kod ise T sütununa göre sıralar.

Bunlara dikkat ettiniz mi? Doğru sütunlar mı?

 

[İsmail Küçükşengün]

Sayın mehmett;

Evet sütunlar doğru.

 

[Levent Menteşoğlu]

Tam yapmıyor derken biraz daha açarmısınız.