Sorteren van hoog naar laag

[Naughtygirl]

Ik moet van een raceclub de wedstrijden bijhouden. In het bijgevoegde bestand zie je de race uitslagen. Zoals je kunt zien staat het totaal (van tablat Totaal) niet van hoog naar laag. Hoe kan ik het totale score van hoog naar laag laten sorteren, zonder dat kolom A wordt mee gesorteerd en het geen invloed heeft op andere bladen?

Wie kan mij hierbij helpen?

 

[trucker10]

met dit stukje code

Sub uitslag_sort()

    [B2:N12].Sort [K2], xlDescending
   
End Sub

of typ eens blixem in de zoekfunctie daar staat er eentje van warme bakkertje of klik hier

 

[paulva]

Openoffice

Lijkt me hetzelfde probleem als
http://www.helpmij.nl/forum/showthread.php/500509-Gegevens-Sorteren-in-Calc

 

[trucker10]

paulva , ik ben niet direct mee , op welk probleem lijkt het ? BTW ik ben morgen in jouw buurt St-Truiden , moet er een paar pallets TL armaturen en andere verlichting komen ophalen bij een winkel die ze verbouwen ( naast de GB ) .

 

[Jack Nouws]

met dit stukje code

Sub uitslag_sort()

    [B2:N12].Sort [K2], xlDescending
   
End Sub

of typ eens blixem in de zoekfunctie daar staat er eentje van warme bakkertje of klik hier

Hallo,

Als je het automatisch gesorteerd wilt hebben

Private Sub Worksheet_Change(ByVal Target As Range)
  [B2:N12].Sort [K2], xlDescending
End Sub

Met vr gr
Jack

 

[HSV]

Handmatig sorteren op kolom 'totaal' zou kunnen door een lege kolom B in te voegen.
Deze lege kolom B verbergen en sorteren.

 

[paulva]

Gelijkaardig geval

Wel, Trucker10, het bestandje sorteren.xls was eigenlijk de oplossing die ik suggereerde bij de vraag van zeMastear (volg de bovenstaande link). Ik heb het ods-bestandje wel moeten omzetten naar *.xls via Openoffice, aangezien ik hier thuis geen Excel meer op mijn pc-tje heb (te duur, een beetje uit principe maar vooral wegens Linux :thumb. Vba is dus ook geen optie voor mij. Hopelijk werkt de oplossing wel in Excel.
Het probleem met dit soort dingen is dat het sorteren van formules geen zier helpt. Zolang de oorspronkelijke getallen niet gesorteerd worden, blijft het resultaat onherroepelijk hetzelfde.

Die winkel naast de GB moet zeker de E5-mode zijn volgens mijn vrouwtje. Niet te lang knipperen met de ogen als je Sint-Truiden inrijdt, he? Voor je het weet ben je de stad weer uit, hi, hi...

Beste groeten,
Paul.

 

[Naughtygirl]

met dit stukje code

Sub uitslag_sort()

    [B2:N12].Sort [K2], xlDescending
   
End Sub

of typ eens blixem in de zoekfunctie daar staat er eentje van warme bakkertje of klik hier

Waar moet ik die code dan typen?

 

[trucker10]

paulva , excel kost ? als je kindern hebt 65 euro , ben je met 2 of 3 dan koop je een thuisversie voor 100 euro , als je iemand kent die studeert zoek eens via google " edupartner "
zeg tegen je vrouwtje dat ze 10 op 10 krijgt .Ik hou mijn ogen open als ik richting Luik rij daar zal ik geen snelheidsovertreding rijden

 

[trucker10]

Waar moet ik die code dan typen?

In de VB Editor , daar waar macrocodes thuis horen , ik heb het in je bestandje gezet ook met wat uitleg op je tabblad .

Bekijk het eens en als er nog vragen zijn dan horen we het graag .

 

[paulva]

Juist

Heel juist, Daniël, maar de twee andere redenen zijn nog niet opgelost.
Wat is 65 euro nog, he? Op de chaussée d'amour kan je hoogstens een half uurtje naar het menu kijken zonder verder aan je trekken te komen. Heb ik van horen zeggen, natuurlijk!!!
Nog een prettige dag morgen en hou het toch maar veilig!

Beste groeten,
Paul.

 

[Jack Nouws]

Hallo

Op deze manier heb je geen last van de formules

Sub test()
  Columns(11).Copy
  Columns(16).PasteSpecial Paste:=xlPasteValues
  [B2:P12].Sort [P2], xlDescending
  Columns(16).Clear
End Sub

Met vr gr
Jack

 

[trucker10]

paulva , het bestandje die jij poste ook gedaan in range C20:G23

 

[Jack Nouws]

Of

  Columns(16).Value = Columns(11).Value
  [B2:P12].Sort [P2], xlDescending
  Columns(16).Clear

 

[Naughtygirl]

Ik heb alles code geprobeerd, maar niets werkt. Of ik doe iets verkeerd? Als ik op de knop sorteer druk, krijg ik een melding.

 

[trucker10]

De macro was niet gekoppeld aan de knop
Dat doet me direct verdere vragen rijzen over het uitbreiden wijzigen van je bestandje , dan moet ook de macro aangepast worden qua range .

 

[Naughtygirl]

De macro was niet gekoppeld aan de knop
Dat doet me direct verdere vragen rijzen over het uitbreiden wijzigen van je bestandje , dan moet ook de macro aangepast worden qua range .

ok, nu werkt ie wel. Hoe heb je die knop gemaakt? en hoe koppel je dan de macro aan de knop?

 

[trucker10]

De knop maak je via de tab " ontwikkelaars " en voor het koppelen zijn er meerdere manieren ik doe dit al eens via een rechtermuisklik op de knop en dan volg ik de schermpjes die komen .
Ik heb ook een wijze zonder knop of macro , selecteer B1 tot K1 en klik dan op filter in het lint ( excel 2007 ) of in de opdracht balk ( excel 2003 ) , zie bestandje .

 

[Naughtygirl]

De knop maak je via de tab " ontwikkelaars " en voor het koppelen zijn er meerdere manieren ik doe dit al eens via een rechtermuisklik op de knop en dan volg ik de schermpjes die komen .
Ik heb ook een wijze zonder knop of macro , selecteer B1 tot K1 en klik dan op filter in het lint ( excel 2007 ) of in de opdracht balk ( excel 2003 ) , zie bestandje .

Dat met de filter is veel gemakkelijker. Geen gedoe met codes enzo. Super bedankt!