• 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.

Tabel sorteren

Status
Niet open voor verdere reacties.

tkint

Gebruiker
Lid geworden
5 dec 2011
Berichten
776
Beste,

Ik heb al eerder deze vraag gesteld en heb van een forumlid deze code ontvangen om te sorteren op kolom A (deze code werkt perfect)

Code:
Sub Sorterenopnaam()
laatsterij = Range("A" & Rows.Count).End(xlUp).Row
Range(Cells(3, 1), Cells(laatsterij, 8)).Select
Cells(1).CurrentRegion.Offset(1).Sort [a2], , , , , , , 1
'        Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlGuess, _
'        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
'        DataOption1:=xlSortNormal
End Sub

Met deze code zou ik wil sorteren op kolom H maar de waarden worden onderaan de tabel en ongesorteerd geplaatst.

Code:
Sub Sorterenopwinstpunten()
laatsterij = Range("A" & Rows.Count).End(xlUp).Row
Range(Cells(3, 1), Cells(laatsterij, 8)).Select
Cells(1).CurrentRegion.Offset(1).Sort [i2], , , , , , , 1
'        Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlGuess, _
'        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
'        DataOption1:=xlSortNormal
End Sub
 

Bijlagen

en hier heb je genoeg aan
Code:
Sub Sorterenopnaam()
  Cells(1).CurrentRegion.Offset(1).Sort [a2], , , , , , , 1
End Sub
Sub Sorterenopwinstpunten()
  Cells(1).CurrentRegion.Offset(1).Sort [h2], , , , , , , 1
End Sub
 
Beste,

Ik wil sorteren op kolom I ipv kolom H. Tikfoutje!
 
Beste,

Ik heb jouw code toegepast maar het resultaat is hetzelfde als met mijn code.
 
en zo
Code:
Sub Sorterenopwinstpunten()
  Cells(1).CurrentRegion.Offset(1).Sort [i2], 2, , , , , , 1
End Sub
 
Je sorteert xlascending, terwijl het xldescending moet zijn.
Code:
Cells(1).CurrentRegion.Offset(1).Sort [i2], [COLOR=#ff0000]2[/COLOR], , , , , , 1
 
Beste,

Hoe "stom" van mij. Ik heb begrepen dat, indien je geen parameter na sort invult er standaard xlascending gesorteerd wordt Zal ik niet meer vergeten!
Bedankt voor de snelle hulp.
 
Dat is niet stom van je, dat is ook zo.
Je wil xldescending sorteren toch?
 
Beste,

Jawel. Met de ingevulde parameter werkt de code perfect. Ik plaats de vraag als opgelost.
 
De 2 staat voor xldescending, niets of 1 staat voor xlascending.

Dat was niet stom van je (dat je het even weet). :thumb:
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan