Preskoči na glavno vsebino

Naključni seznam v Excelu (preprosta vadnica po korakih)

Izvajanje naključnega razvrščanja je hiter in enostaven način za zagotovitev, da se na koncu prikažejo vsi primeri z enako verjetnostjo. V tej vadnici bomo govorili o tem, kako preprosto naključno razvrstiti ali premešati seznam v Excelu v nekaj korakih.


Videoposnetek: Naključni seznam v Excelu


Naključno uredite seznam s funkcijami

V tem razdelku vas bom naučil, kako premešati seznam z vgrajenimi Excelovimi funkcijami.

Naključno uredite seznam s funkcijo RAND

Uporabniki katere koli različice Excela lahko naključno razvrstijo svoj izvirni nabor podatkov z uporabo RAND delujejo s pomočjo Razvrščanje sledite spodnjim korakom.

1. korak: Vnesite formulo RAND

Izberite celico poleg zgornje celice seznama, ki ga boste naključno razporedili, vnesite spodnjo formulo RAND in pritisnite Vnesite.

=RAND()

2. korak: Izpolnite formulo RAND v druge celice

Dvokliknite ročico za polnjenje (majhen zeleni kvadrat v spodnjem desnem kotu) celice s formulo, da uporabite formulo za spodnje celice.

3. korak: Razvrstite rezultate RAND, da premešate seznam

1. Izberite B2: B8, seznam, ki vsebuje formulo RAND.

2. Kliknite na Razvrsti in filtriraj > Razvrsti od Najmanjše do Največje v Urejanje skupina na HOME tab.

3. V pojavnem oknu Razvrsti opozorilo dialog, izberite Razširite izborin nato kliknite na Razvrščanje.

Rezultat

Zdaj ste pripravljeni! Seznam je naključno razvrščen, kot je prikazano spodaj.

Opomba: O Excelova funkcija RAND je nestanoviten: znova izračuna svoj rezultat ob vsaki spremembi delovnega lista. Torej so se številke v stolpcu B spremenile takoj po razvrščanju. Če želite znova premešati seznam, ponovite zgornje korak 3. V nasprotnem primeru lahko preprosto izbrišete stolpec s funkcijo RAND.
Naključno uredite seznam s funkcijami RANDARRAY, SORTBY in ROWS (Excel 365/2021)

Če uporabljate novejše različice Excela, na primer Excel za Microsoft 365 ali Excel 2021 ali Excel za splet, RANDARRAY, RAZVRSTI PO in ROWS Formula vam bo pomagala hitro premešati seznam na mestu, ki ste ga določili.

1. korak: Vnesite formulo RANDARRAY, SORTBY in ROWS

Izberite prazno celico, kjer želite dobiti naključni rezultat, vnesite spodnjo formulo (upoštevajte, da bi morali spremeniti A2: A8 v spodnji formuli na prvotni seznam, ki ga želite naključno razvrstiti) in pritisnite Vnesite.

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

Opomba:
  • #RAZLITJE napake se vrnejo, ko je obseg razlitja (B2: B8 v tem primeru) za formulo ni prazno.
  • Formula je nestanovitna: znova izračuna svoj rezultat ob vsaki spremembi delovnega lista. Če želite seznam znova premešati, pritisnite F9.
  • Rezultata formule (naključni seznam) ni mogoče urejati. Če morate urediti naključni seznam, sledite naslednjemu koraku.

(Izbirno) 2. korak: Kopirajte in prilepite rezultat formule, da ga bo mogoče urejati

Če želite videti samo naključen rezultat, lahko preskočite ta korak. Če želite urediti naključno premešan seznam, kopirajte rezultat formule in prilepite samo vrednosti:

1. Izberite rezultat formule in pritisnite Ctrl + C da ga kopirate.

2. Z desno miškino tipko kliknite celico, kamor boste prilepili kopirani rezultat. (Vrednost lahko tudi prilepite na prvotno mesto.)

3. Izberite Prilepi samo vrednosti možnost v meniju z desnim klikom.

Rezultat

Zdaj boste dobili premešan seznam, ki ga je mogoče urejati, kot je prikazano spodaj.


Naključno uredite seznam v Excelu s Kutools v 2 klikih

Če ste utrujeni od uporabe formul in nameravate uporabiti pomoč dodatka, Kutools za ExcelJe Naključno razvrsti / izberi obseg funkcija vam lahko z več možnostmi pomaga veliko lažje izvesti naključno razvrščanje. Prosimo, da kot sledi:

Najprej izberite seznam, ki ga boste premešali. In nato izberite Kutools > Območje > Naključno razvrsti / izberi obseg. V pojavnem oknu Naključno razvrsti / izberi obseg dialog, izberite Cele vrsticein nato kliknite na Ok.

Opomba:

Naključno uredite seznam z VBA

Če želite seznam naključno razvrstiti z metodo VBA, naredite naslednje.

Opomba: Po zagonu makra VBA ne morete razveljaviti. Zato naredite kopijo seznama nekje drugje, če boste v prihodnosti potrebovali izvirne podatke.

1. korak: Izberite seznam, ki ga boste premešali

2. korak: Kopirajte kodo VBA v okno modula

1. Pritisnite Ctrl + F11 da odprete urejevalnik VBA, in nato kliknite Vstavi > Moduli da odprete okno s kodo modula.

2. Kopirajte in prilepite spodnjo kodo VBA v odprto okno modula.

Koda VBA: naključno razvrščanje seznama

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

3. korak: Zaženite kodo VBA

V oknu kode pritisnite F5 ali kliknite na gumb za zagon te kode.

Rezultat

Opomba: Če želite znova naključno razvrstiti seznam, ponovite zgornje korak 3.