Meer dan 3 sorteer selecties

[AABE]

Best Forum,

ik wil in rij 1 in diverse kolommen en getal ingeven waarbij de getalwaarde de sorteervolgorde van de sortering bepaald.

Bijvoorbeeld;

H1 = 1
C1 = 2
B1 = 3
Z1 = 4
X1 = 5
G1= 6

Ik wil dit middels een macro uitvoeren.

Kunnen jullie me een eindje op weg helpen?

Bedankt,

Aat

 

[Roncancio]

Een opzetje:

    Range("A1:Z100").Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight, _
        DataOption1:=xlSortNormal

Zorg dat de orientation (vet weergegeven) van links naar rechts staat.

Met vriendelijke groet,


Roncancio

 

[AABE]

Een opzetje:

    Range("A1:Z100").Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight, _
        DataOption1:=xlSortNormal

Zorg dat de orientation (vet weergegeven) van links naar rechts staat.

Met vriendelijke groet,


Roncancio

Niet helemaal wat ik bedoel.
Wat jij aangeeft is de normale sorteerroutine van excel. Deze gaat maar tot 3 key's.
Ik wil dat de gebruiker in rij1 in de kolommen aangeeft welke kolommen hij wil sorteren (waarde groter dan 1) en in welke volgorde (laagste waarde eerst, hoogste waarde laatst).
Hierbij het aantal key's uit kunnen breiden tot bijvoorbeeld 6.


Aat

 

[Wigi]

Volgens mij moet je dan van groot naar klein door die getallen gaan, eerst sorteren op kolom 6 - 5 - 4 (in die volgorde) en dan op 3 - 2 - 1.

Uiteraard wordt het moeilijker omdat er veel mogelijkheden zijn, dus zal je een lus moeten schrijven van groot naar klein.

Wigi