Hoe rangschikt u gegevens in omgekeerde volgorde in Excel?
In Excel zorgt de standaardformule =RANG(cel; bereik) ervoor dat uw gegevens zo worden gerangschikt dat de grootste waarde rang 1 krijgt en de kleinste waarde het laagste rangnummer toegewezen krijgt. Maar soms wilt u deze logica juist omdraaien: dan krijgt de kleinste waarde de hoogste rang en de grootste waarde de laagste rang, zoals in de onderstaande schermafbeelding wordt weergegeven. Dit is bijzonder handig bij het analyseren van gegevens waarbij lagere waarden betere prestaties aanduiden—denk aan tijden bij races, kosten of foutaantallen.
Gegevens in omgekeerde volgorde rangschikken|VBA-code: Wijs automatisch omgekeerde rangnummers toe
Gegevens in omgekeerde volgorde rangschikken
Om een omgekeerde rangschikking uit te voeren in Excel, past u de standaardformule RANG eenvoudig aan door een extra argument toe te voegen. Zo rangschikt u uw gegevens razendsnel van kleinste naar grootste—precies het tegenovergestelde van de standaardvolgorde.
Selecteer een lege cel waarin het resultaat van de omgekeerde rangschikking moet verschijnen. Als uw gegevensbereik zich bevindt in cellen B2 tot en met B10, voert u de volgende formule in de eerste cel naast uw gegevens in (bijvoorbeeld in cel C2):
=RANK(B2,$B$2:$B$10,1)Nadat u de formule hebt ingevoerd, drukt u op Enter. Wilt u de formule toepassen op de overige cellen in uw kolom? Gebruik dan de vulgreep: plaats uw muisaanwijzer op de rechterbenedenhoek van de cel met de formule (C2). Zodra de cursor verandert in een plus-teken, sleept u deze naar beneden om alle resterende cellen naast uw gegevens automatisch in te vullen (in dit voorbeeld tot en met C10).
Als uw gegevensbereik afwijkt, past u eenvoudigweg de celverwijzingen in de formule aan zodat deze overeenkomen met uw werkelijke gegevens. Houd er rekening mee dat wanneer u dubbele waarden heeft, de RANG-functie dezelfde rang toewijst aan die waarden en daaropvolgende rangnummers overslaat (bijvoorbeeld: als twee items gedeeld tweede zijn, wordt de volgende rang vier).
Omgekeerde rangschikking is bijzonder waardevol als u de laagste waarden of snelste tijden wilt benadrukken en werkt uitstekend bij datasets waar gelijke waarden acceptabel of zelfs verwacht zijn.
VBA-code: Wijs automatisch omgekeerde rangnummers toe
Voor grotere datasets of scenario’s waarin uw gegevens regelmatig worden bijgewerkt en u een meer geautomatiseerde oplossing nodig heeft, kunt u VBA-code gebruiken om snel en efficiënt omgekeerde rangnummers toe te wijzen. Deze methode is perfect voor gebruikers met enige programmeerervaring die herhalende handmatige stappen willen elimineren.
1. Open de VBA-editor door te klikken op Ontwikkelaarshulpmiddelen > Visual Basic. Klik in het venster Visual Basic for Applications op Invoegen > Module en plak de volgende code in het modulevenster:
Sub AssignReverseRank()
Dim dataRange As Range
Dim outputRange As Range
Dim i As Long
Dim j As Long
Dim temp As Variant
Dim arr As Variant
Dim sortedArr As Variant
Dim rankArr() As Long
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set dataRange = Application.InputBox("Select the data range to rank (single column):", xTitleId, "", Type:=8)
If dataRange Is Nothing Then Exit Sub
Set outputRange = Application.InputBox("Select the first cell for output ranks:", xTitleId, "", Type:=8)
If outputRange Is Nothing Then Exit Sub
arr = dataRange.Value
ReDim rankArr(1 To UBound(arr, 1), 1 To 1)
sortedArr = arr
' Sort the array in ascending order
For i = 1 To UBound(sortedArr, 1) - 1
For j = i + 1 To UBound(sortedArr, 1)
If sortedArr(i, 1) > sortedArr(j, 1) Then
temp = sortedArr(i, 1)
sortedArr(i, 1) = sortedArr(j, 1)
sortedArr(j, 1) = temp
End If
Next j
Next i
' Assign reverse ranks
For i = 1 To UBound(arr, 1)
For j = 1 To UBound(sortedArr, 1)
If arr(i, 1) = sortedArr(j, 1) Then
rankArr(i, 1) = j
Exit For
End If
Next j
Next i
outputRange.Resize(UBound(rankArr, 1), 1).Value = rankArr
End Sub2. Voer de macro uit door op de knop 
Uitvoeren te klikken of door op F5 te drukken. U wordt gevraagd uw gegevensbereik te selecteren (kies één kolom die u in omgekeerde volgorde wilt sorteren) en daarna de eerste cel waarin u de sorteervolgorde wilt weergeven. Klik na elke selectie op OK.
Deze macro sorteert uw gegevens in oplopende volgorde en wijst daarbij omgekeerde rangnummers toe, waarbij de kleinste waarde rang 1 krijgt. Ideaal voor het efficiënt rangschikken van duizenden gegevenspunten in één keer of voor het automatiseren van rangschikkingen in regelmatig vernieuwde rapporten.
Zorg bij gebruik van deze macro dat uw gegevens aaneengesloten zijn en uitsluitend numerieke waarden bevatten. Niet-numerieke of lege cellen kunnen onjuiste resultaten opleveren, dus schoon uw gegevens eerst op. Sla bovendien uw werkmap altijd op voordat u macro’s uitvoert, om onbedoelde wijzigingen te voorkomen.
Beste Office-productiviteitshulpmiddelen
Geef uw Excel-vaardigheden een boost met Kutools voor Excel en ervaar efficiëntie zoals nooit tevoren.Kutools voor Excel biedt meer dan 300 geavanceerde functies om de productiviteit te verhogen en Tijd besparen.Klik hier om de functie te krijgen die u het meest nodig heeft...
Office Tab brengt een tabbladinterface naar Office en maakt uw werk veel eenvoudiger
- Schakel tabbladbewerking en -lezen in voor Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
- Open en maak meerdere documenten aan in nieuwe tabbladen binnen hetzelfde venster, in plaats van in afzonderlijke vensters.
- Verhoogt uw productiviteit met 50 % en bespaart u dagelijks honderden muisklikken!
Alle Kutools-add-ins in één installatieprogramma.
Kutools for Office bundelt add-ins voor Excel, Word, Outlook en PowerPoint, plus Office Tab Pro—ideaal voor teams die met meerdere Office-apps werken.
- Alles-in-één suite— add-ins voor Excel, Word, Outlook & PowerPoint plus Office Tab Pro
- Één installatieprogramma, één licentie— binnen enkele minuten klaar (MSI-geschikt)
- Werkt beter samen— gestroomlijnde productiviteit in alle Office-apps
- 30 dagen volledig functionele proefversie— geen registratie, geen creditcard
- Beste prijs-kwaliteitverhouding— bespaar ten opzichte van het afzonderlijk kopen van add-ins