automatisch sorteren

[stefano]

Hoi, hallo,

Ik heb een tabel met testnamen gevolgd door alle resultaten. Telkens ik deze tabel genereer staan deze kolommen willekeurig door elkaar. Ik ben op zoek naar een manier waarop ik mbv een makro deze kolommen in een gesorteerde volgorde (die ik zelf definieer) kan weergeven.

proef......a.....b....f.....c....e....d......g
staal 1...15..13..20..25...2...17....41
...

wat ik wil bekomen na sorteren is

proef ...a...b...c....f

PS en niet onbelangrijk : de oorspronkelijke tabel bevat niet altijd dezelfde testen en de testen staan STEEDS in een andere volgorde...., maw sorteren via de werkbalk lukt hier niet.

dank bij voorbaat,

Stefano

 

[jheesterbeek]

Onder Data-Sorteren-Opties kun je kiezen voor sorteren van links naar rechts. Hiermee zou je de kolommen op alfabetische volgorde kunnen zetten.
Als je dit opneemt met de macro-recorder krijg je onderstaande code:
Range("B1:Z2").Select
Selection.Sort Key1:=Range("B1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlLeftToRight, _
DataOption1:=xlSortNormal


Succes

John

 

[stefano]

ja maar ...

klopt je uitleg, maar het probleem is net dat het niet in alfabetische volgorde is. Dus ergens moet er een verwijzing zijn naar de kolomnaam (= testnaam) en dan met opzoeken of zoiets tot het eindresultaat komen...

 

[jheesterbeek]

Wat voor soort volgorde heb je in gedachten?

Je zou een nieuw blad kunnen maken met alle mogelijke testen en daarnaast een nummer van de volgorde. Als je dan in het blad waar je wilt sorteren deze volgorde ophaald met vertikaal zoeken, kun je weer gebruik maken van de standaard functionaliteit van Excel.