• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

sorteren op 2 kolommen

Status
Niet open voor verdere reacties.

jansm

Gebruiker
Lid geworden
2 apr 2014
Berichten
421
Hallo,
ik sorteer mijn tabel nu op kolom A. Ik wil sorteren in de volgorde A en E. .Sort ([E2]) invoegen is te simpel geredeneerd. Wat moet de code hiervoor wel worden?

With Range("A2", "M" & lr)
.Sort ([A2])
End With
 
Zet de cursor in de VB-editor op .sort of erachter en druk eens F1.
Dat moet haast lukken.

Anders in het zoekvak van F1 zoeken naar Range.Sort.
 
Misschien ook eerst even zoeken op het range object?

range("A2:M" & lr).sort
 
@VenA, schrijfwijze is niet alledaags, maar kan wel hoor.
Code:
Range("A2", "M10").select
 
... doet het niet

Code:
With Range("A2", "M" & lr)
     .Sort ([A2,Order:=xlAscending, E2,Order:=xlAscending])
End With

Foute interpretatie van HELP-functie?
 
.. ook niet

With Range("A2", "M" & lr)
.Sort ([A2,XlSortOrder=xlAscending, E2,XlSortOrder=xlAscending])
End With
 
Wat dacht je van de haken.
 
Mischien een dom antwoord?
Kun je het geen je wil niet met de macro recorder opnemen.
Daarna de de code trachten te opschonen.
 
@ Amateur
had ik al geprobeerd, kreeg h'm werkend maar dan wordt de code een verhaal zeg.
@ Harry en VenA
De info achter de F1 is voor mij niet duidelijk genoeg. Allerlei haken geprobeerd aan de hand van de F1 info, kreeg h'm niet werkend.
Dit is het na veel zoeken en proberen geworden
Code:
With Range("A2", "M" & lr)
            .Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range("E2"), Order1:=xlAscending
End With
 
Als het werkt dan mag je de vraag op opgelost zetten. De haakje zijn inderdaad wat verwarrend in de helpfunctie als je niet weet hoe het opgebouwd is.

Zoals door HSV aangegeven is het gebruik van de range methode niet alledaags.

Mijn voorkeur gaat naar zoiets uit.
Code:
Sub VenA()
  With Cells(1).CurrentRegion
    .Sort [A2], , [E2], , , , , xlNo
  End With
End Sub
 
dank VenA.
ik wil graag jouw methode gebruiken maar wat mij tegen houd is dat ik de .Sort regel niet begrijp. xlNo/xlGuess heb ik in de helpfunctie kunnen vinden maar wat doen die komma's in de regel? Zou het fijn vinden als je die met een paar woorden/regels zou willen verklaren. Of via een link naar een verklaring.
 
Zijn Sorteer voorwaarden
 

Bijlagen

  • Nieuw - Microsoft Excel-werkblad.xlsx
    708,9 KB · Weergaven: 100
dank Jack.
A2 en E2 zijn Key1 en Key2 neem ik aan. Dan voor iedere voorwaarde een komma? Zo te zien dan achter A2 1 voorwaarde en achter E2 4 voorwaarden. Waarom deze verschillen voor A2 en E2?
 
ja VenA, maar ook de info op die site verklaart niet het gebruik van komma's in de coderegel.
 
In een gewone formule geef je toch ook een , of ; aan tussen de verschillende argumenten. Dus waarom zou dat in VBA anders zijn. Standaard waarden mag je leeg laten.
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan