sort ( 3 ten fazla key nasıl kullanılır) lütfen yardım.

[samsun2005]

SIRALAMA İÇİN KOD
-----------------------------------------------------
Range("A5:M1004").Select
Selection.Sort Key1:=Range("L5"), Order1:=xlAscending, Key2:=Range("K5") _
, Order2:=xlAscending, Key3:=Range("A5"), Order3:=xlAscending, _
Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, DataOption3:=xlSortNormal

ARKADAÞLAR HERKESE MEHABA!
YUKARIDAKİ RESİMDEKİ GİBİ BİR ÇİZELGEM VAR.
BU ÇİZELGEYİ BİRİNCİ (“L5”) SÜTUNUNA GÃ?RE , İKİNCİ (“K5”) SÜTUNUNA GÃ?RE, ÜÇÜNCÜ (“A5”) SÜTUNUNA GÃ?RE SIRALATIYORUM.BUNUN KISACA AÇIKLAMASI ÞU: “L5 “ LİSTEDEKİ VERİLERİ 3 GRUBTA GRUPLANDIRIYOR.
“K5” BU GRUPLARI YİNE KENDİ İÇİNDE 3 GRUBA SIRALIYOR(CVS-ONB-ER). “A5” ARTAN OLARAK SIRALIYOR.
BEN “D5” SÜTUNUNDADA GRUPLARI KENDİ İÇİNDE ALFABETİK SIRALAMA İSTİYORUM.FAKA OLMUYOR.YUKARIDAKİ KODA Key4 EKLEDİÐİMDE HATA VERİYOR .BUNUN BAÞKA YOLU VARMI.LÜTFEN YARDIM.TEÞEKKÜRLER

 

[Levent Menteşoğlu]

Bu durumda sıralamayı bir kaç aşamada yapmanızı öneririm. Hangi sütuna göre önce sıralamanız gerektiğini kendi dosyanıza göre tespit edersiniz. Ã?rneğin aşağıdaki gibi olabilir.

[vb:1:26788376fc]Range("A5:M1004").Sort Key1:=Range("D5")
Range("A5:M1004").Sort Key1:=Range("L5"), Key2:=Range("K5"), Key2:=Range("A5")

[/vb:1:26788376fc]