Een lijst randomiseren in Excel (eenvoudige stapsgewijze handleiding)

Video: Een lijst randomiseren in Excel

Een lijst randomiseren met functies

In dit gedeelte laat ik u zien hoe u een lijst kunt schudden met ingebouwde Excel-functies.

Randomiseer een lijst met de RAND-functie

Gebruikers van elke Excel-versie kunnen hun oorspronkelijke dataset willekeurig sorteren door de RAND-functie te combineren met de sorteeroptie. Volg hiervoor de onderstaande stappen.

Stap 1: Voer de RAND-formule in

Selecteer de cel naast of direct boven de lijst die u wilt randomiseren, voer de onderstaande RAND-formule in en druk op Enter.

=RAND()

Stap 2: Vul de RAND-formule in andere cellen in

Dubbelklik op het vulhulpje (het kleine groene vierkantje rechts onderaan) van de formulecel om de formule automatisch op de cellen eronder toe te passen.

Stap 3: Sorteer de RAND-resultaten om de lijst te schudden

1. Selecteer "B2:B8", de lijst met de RAND-formule.

2. Klik op "Sorteren en filteren" > "Sorteer van kleinste naar grootste" in de "Bewerken„-groep op het "Start"-tabblad.

3. Selecteer in het pop-updialoogvenster 'Selectie uitbreiden' en klik daarna op 'Sorteren'.

Resultaat

U bent nu helemaal klaar! De lijst is gerandomiseerd, zoals hieronder te zien is.

Randomiseer een lijst met de functies RANDARRAY, SORTBY en ROWS (Excel 365/2021)

Als u een nieuwere versie van Excel gebruikt, zoals Excel voor Microsoft 365, Excel 2021 of Excel voor het web, helpt de formule met RANDARRAY, SORTBY en ROWS u razendsnel een lijst op de gewenste positie te schudden.

Stap 1: Voer de formule met RANDARRAY, SORTBY en ROWS in

Selecteer een lege cel waarin u het gerandomiseerde resultaat wilt plaatsen, typ de onderstaande formule (let op: vervang ")A2:A8" in de onderstaande formule door de oorspronkelijke lijst die u wilt randomiseren) en druk op Enter.

=SORTBY(A2:A8,RANDARRAY(ROWS(A2:A8)))

(Optioneel) Stap 2: Kopieer en plak het formuleresultaat om het bewerkbaar te maken

Als u alleen een willekeurig resultaat wilt bekijken, kunt u deze stap overslaan. Wilt u de willekeurig geschudde lijst bewerken? Dan kopieert u het formuleresultaat en plakt u het als waarden:

1. Selecteer het formuleresultaat en druk op Ctrl + C om het te kopiëren.

2. Klik met de rechtermuisknop op de cel waar u het gekopieerde resultaat wilt plakken. (U kunt de waarde ook op de oorspronkelijke locatie plakken.)

3. Selecteer de optie „Waarden plakken” in het contextmenu.

Resultaat

U ontvangt nu een geschudde en bewerkbare lijst, zoals hieronder wordt weergegeven.

Randomiseer een lijst in Excel met Kutools in 2 klikken

Bent u het gebruik van formules zat en wilt u liever een add-in gebruiken? Dan helpt de Kutools voor Excel’s Sorteren, selecteren of willekeurig-functie u om op een veel eenvoudigere manier en met meer opties een willekeurige sorteervolgorde toe te passen. Volg deze stappen:

Selecteer eerst de lijst die u wilt schudden. Klik vervolgens op „Kutools” > „Bereik” > „Sorteren, selecteren of willekeurig”. Selecteer in het pop-updialoogvenster „Sorteren, selecteren of willekeurig” de optie „Gehele rij” en klik op „OK”.

Een lijst randomiseren met VBA

Als u liever een lijst randomiseert met een VBA-methode, volgt u deze stappen.

Stap 1: Selecteer de lijst die u wilt schudden

Stap 2: Kopieer de VBA-code naar het modulevenster

1. Druk op Ctrl + F11 om de VBA-editor te openen en klik daarna op Invoegen > Module om een modulecodevenster te openen.

2. Kopieer en plak de onderstaande VBA-code in het geopende modulevenster.

Sub RandomSort()
'Update by ExtendOffice
Dim xRg As Range
Dim xNum, xF, xI As Integer
Dim xWSh, xAWSh As Worksheet
On Error Resume Next
Application.ScreenUpdating = False
Application.DisplayAlerts = False
Set xAWSh = Application.ActiveSheet
Set xRg = ActiveWindow.RangeSelection
Set xWSh = Worksheets.Add
xNum = xRg.Count
For xF = xNum To 1 Step -1
    xI = WorksheetFunction.RandBetween(1, xF)
    xWSh.Range("A1").Value = xRg.Item(xI)
    xRg.Item(xI) = xRg.Item(xF)
    xRg.Item(xF) = xWSh.Range("A1")
Next
xWSh.Delete
Application.ScreenUpdating = True
Application.DisplayAlerts = True
End Sub

Stap 3: Voer de VBA-code uit

Druk in het codevenster op "F5" of klik op de -knop om deze code uit te voeren.

Resultaat

Gerelateerde artikelen

• Hoe selecteert u willekeurige cellen in Excel?
• Stel dat u een kolom met waarden (A1:A15) in een werkblad hebt en nu vijf willekeurige cellen daaruit moet selecteren – hoe pakt u dat dan aan? In dit artikel laat ik u enkele handige trucs zien om eenvoudig willekeurige cellen te selecteren in Excel.
• Hoe selecteert u willekeurige gegevens uit een lijst zonder duplicaten?
• In dit artikel bespreek ik hoe u een cel kunt selecteren uit een lijst zonder dubbele waarden. De volgende twee methoden helpen u deze taak zo snel mogelijk uit te voeren.
• Hoe selecteert u willekeurig cellen op basis van bepaalde criteria in Excel?
• Stel dat u willekeurig enkele gegevens moet selecteren op basis van één of twee criteria uit een beperkt bereik – hoe lost u dat dan op in Excel? Dit artikel biedt u een paar handige oplossingen.
• Hoe vult u willekeurig waarden in uit een lijst met gegevens in Excel?
• Stel bijvoorbeeld dat u een Naamlijst hebt en nu willekeurig enkele namen moet selecteren en invullen in opgegeven cellen, hoe pakt u dat aan? Hier introduceer ik een paar methoden om willekeurig waarden in te vullen vanuit een lijst met gegevens in Excel.
• Meer tips en trucs voor Excel…