In het bijgevoegde bestandje staan twee arrays respectievelijk in kolom A en kolom B. In kolom D staat de sorteervolgorde. Is het mogelijk de twee arrays te sorteren volgens de sorteervolgorde ? Bedankt om mee te denken.Bekijk bijlage ArSort.xlsx
"Dé grootste en gratis computerhelpdesk van Nederland"
-
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.
array sorteren volgens een zelf vastgelegde volgorde
- Onderwerp starter ikselle
- Startdatum
- Status
cow18
Terugkerende gebruiker
- Lid geworden
- 24 mei 2008
- Berichten
- 4.276
- Besturingssysteem
- Windows
- Office versie
- Excel365
via Bestand>opties>geavanceerd> en dan bijna helemaal beneden"aangepaste lijsten bewerken" kan je je sorteervolgorde importeren en daarna kan je volgens die volgorde je 2 arrays sorteren
Piet Bom
Verenigingslid
- Lid geworden
- 13 nov 2010
- Berichten
- 786
Ik weet niet wat er speciaal is aan de sorteervolgorde (het is zeker niet alfa-numeriek)
Het speciale lijkt mij dat de 2 arrays ge-merged worden en daarna alfanumeriek gesorteerd en de dubbele waarden zijn eruit.
De afzonderlijke stappen kunnen met wat VBA-code geautomatiseerd worden door bijv. een klik op de button.
Het speciale lijkt mij dat de 2 arrays ge-merged worden en daarna alfanumeriek gesorteerd en de dubbele waarden zijn eruit.
De afzonderlijke stappen kunnen met wat VBA-code geautomatiseerd worden door bijv. een klik op de button.
cow18
Terugkerende gebruiker
- Lid geworden
- 24 mei 2008
- Berichten
- 4.276
- Besturingssysteem
- Windows
- Office versie
- Excel365
@snb, zelfs met een draaitabel ?
Ik zie je aangemaakte customlist wel, maar ik vind niet waar je die kan toepassen op je rijen in de draaitabel.
Ik heb enkel de opties handmatig, oplopend en aflopend.
Waar kan ik die customlist dan vinden en toepassen binnen die draaitabel ?
Ik zie je aangemaakte customlist wel, maar ik vind niet waar je die kan toepassen op je rijen in de draaitabel.
Ik heb enkel de opties handmatig, oplopend en aflopend.
Waar kan ik die customlist dan vinden en toepassen binnen die draaitabel ?
Bedankt allemaal om dit mee te bekijken.
@VenA : zowel de eerste als de tweede array zouden moeten gesorteerd kunnen worden
@cow18 en Snb : ik zoek eigenlijk een oplossing in VBA om dit in een macro te verwerken
@Piet Bom : ik bekom bij een macro verschillende arrays. Deze arrays bevatten elementen die naar belang gerangschikt dienen te worden dus inderdaad niet alfanumeriek (vandaar de sorteerarray die alle mogelijke elementen bevat)
@VenA : zowel de eerste als de tweede array zouden moeten gesorteerd kunnen worden
@cow18 en Snb : ik zoek eigenlijk een oplossing in VBA om dit in een macro te verwerken
@Piet Bom : ik bekom bij een macro verschillende arrays. Deze arrays bevatten elementen die naar belang gerangschikt dienen te worden dus inderdaad niet alfanumeriek (vandaar de sorteerarray die alle mogelijke elementen bevat)
snb
Verenigingslid
- Lid geworden
- 12 jun 2008
- Berichten
- 19.714
Dat staat dan hier al voor je klaar: http://www.snb-vba.eu/VBA_Excel_customlist.html
Piet Bom
Verenigingslid
- Lid geworden
- 13 nov 2010
- Berichten
- 786
@ikselle,
Ik had je vraag toch niet goed begrepen.
Nu denk ik het wel te snappen.
Met VBA een routine gemaakt die de twee kolommen afzonderlijk sorteert in de volgorde van de voorbeeldkolom.
Kunnen er in kolommen A en B ook waarden voorkomen die niet in de voorbeeldkolom zitten ?
Correctie: de verkeerde bijlage erbij gedaan
Ik had je vraag toch niet goed begrepen.
Nu denk ik het wel te snappen.
Met VBA een routine gemaakt die de twee kolommen afzonderlijk sorteert in de volgorde van de voorbeeldkolom.
Kunnen er in kolommen A en B ook waarden voorkomen die niet in de voorbeeldkolom zitten ?
Correctie: de verkeerde bijlage erbij gedaan
Laatst bewerkt:
@snb,
In tegenstelling tot cow18, die blijkbaar wel een aangepaste customlist ziet, zie ik deze lijst niet in jouw bestand? En verder ben ik benieuwd naar het antwoord op de laatste vraag van cow18 in #6
Even een plaatje met wat ik te zien krijg
In tegenstelling tot cow18, die blijkbaar wel een aangepaste customlist ziet, zie ik deze lijst niet in jouw bestand? En verder ben ik benieuwd naar het antwoord op de laatste vraag van cow18 in #6
Even een plaatje met wat ik te zien krijg
Een customlist maken en dan sorteren.
Code:
Sub VenA()
With Application
.AddCustomList Sheets("Sheet1").Columns(4).SpecialCells(2).Offset(1).SpecialCells(2).Value
Sheets("Sheet1").Columns(1).Sort Sheets("Sheet1").[A1], , , , , , , xlYes, .CustomListCount + 1
Sheets("Sheet1").Columns(2).Sort Sheets("Sheet1").[B1], , , , , , , xlYes, .CustomListCount + 1
.DeleteCustomList (.CustomListCount)
End With
End Sub- Status
