Provádění náhodného řazení je rychlý a snadný způsob, jak zajistit, že se všechny případy objeví se stejnou pravděpodobností. V tomto tutoriálu budeme hovořit o tom, jak snadno randomizovat nebo zamíchat seznam v Excelu v několika krocích.
V této části vás naučím, jak zamíchat seznam pomocí vestavěných funkcí Excelu.
Uživatelé jakékoli verze Excelu mohou náhodně třídit svou původní datovou sadu pomocí RAND fungovat s pomocí Typ funkce, postupujte podle níže uvedených kroků.
Krok 1: Zadejte vzorec RAND
Vyberte buňku vedle horní buňky seznamu, který budete randomizovat, zadejte níže uvedený vzorec RAND a stiskněte vstoupit.
=RAND()
Krok 2: Doplňte vzorec RAND do dalších buněk
Poklepáním na úchyt (malý zelený čtverec v pravém dolním rohu) buňky vzorce použijete vzorec na buňky níže.
Krok 3: Seřaďte výsledky RAND a promíchejte seznam
1. vybrat B2: B8, seznam, který obsahuje vzorec RAND.
2. Klikněte na Třídit a filtrovat > Řadit od nejmenšího k největšímu v Editace skupina na Home Karta.
3. Ve vyskakovacím okně Varování řazení , vyberte Rozbalte výběr, a potom klepněte na tlačítko Typ.
Výsledek
Nyní je vše připraveno! Seznam je náhodný, jak je uvedeno níže.
Pokud používáte novější verze Excelu, například Excel pro Microsoft 365 nebo Excel 2021 nebo Excel pro web, RANDARRAY, SEŘAZENO PODLE a ŘADY vzorec vám pomůže rychle získat zamíchaný seznam na zadané pozici.
Krok 1: Zadejte vzorec RANDARRAY, SORTBY a ROWS
Vyberte prázdnou buňku, kde chcete získat náhodný výsledek, zadejte níže uvedený vzorec (Všimněte si, že byste měli změnit A2: A8 podle níže uvedeného vzorce na původní seznam, který chcete náhodně rozdělit) a stiskněte vstoupit.
=SORTBY(A2:A8,RANDARRAY(ROWS(A2:A8)))
(Volitelné) Krok 2: Zkopírujte a vložte výsledek vzorce, aby jej bylo možné upravovat
Pokud chcete vidět pouze náhodný výsledek, můžete tento krok přeskočte. Pokud chcete upravit náhodně zamíchaný seznam, měli byste zkopírovat výsledek vzorce a vložit pouze hodnoty:
1. Vyberte výsledek vzorce a stiskněte Ctrl + C kopírovat.
2. Klepněte pravým tlačítkem myši na buňku, kam vložíte zkopírovaný výsledek. (Můžete také vložit hodnotu do původního umístění.)
3. Vybrat Vložit pouze hodnoty možnost z nabídky po kliknutí pravým tlačítkem myši.
Výsledek
Nyní získáte zamíchaný a upravitelný seznam, jak je znázorněno níže.
Pokud vás nebaví používat vzorce a máte v úmyslu použít pomoc doplňku, Kutools pro ExcelJe Třídit / vybírat rozsah náhodně Tato funkce vám může pomoci provést náhodné řazení mnohem snadněji s více možnostmi. Prosím takto:
Nejprve vyberte seznam, který budete zamíchat. A pak vyberte Kutools > Rozsah > Třídit / vybírat rozsah náhodně. Ve vyskakovacím okně Třídit / vybírat rozsah náhodně , vyberte Celé řádky, a potom klepněte na tlačítko Ok.
Pokud dáváte přednost náhodnému uspořádání seznamu pomocí metody VBA, postupujte následovně.
Krok 1: Vyberte seznam, který budete zamíchat
Krok 2: Zkopírujte kód VBA do okna modulu
1. lis Ctrl + F11 otevřete editor VBA a potom klepněte na Vložit > Modul otevřete okno s kódem modulu.
2. Zkopírujte a vložte níže uvedený kód VBA do otevřeného okna modulu.
Kód VBA: Náhodné řazení seznamu
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
V okně kódu stiskněte F5 nebo klikněte na tlačítko tlačítko pro spuštění tohoto kódu.
Výsledek