✅ Predložak generatora slučajnih grupa (besplatno preuzimanje)

Sadržaj

Predložak generatora slučajnih grupa

Ako ste učitelj ili trener, stvaranje grupa učenika/sudionika zajednički je zadatak. Na primjer, možda biste htjeli stvoriti grupe za provođenje kviza ili aktivnosti izgradnje tima.

I u većini slučajeva ove grupe trebaju biti nasumične.

Danas dijelim predložak generatora slučajnih grupa koji će vam uvelike olakšati stvaranje grupe učenika/sudionika.

Sve što trebate je popis učenika ili sudionika i navedite koliko grupa želite stvoriti.

Predložak generatora slučajnih grupa

Evo demo načina na koji ovaj predložak generatora slučajnih grupa (ili nasumičnih timova) radi:

Popis učenika/sudionika nalazi se u A2: A17. Ako imate duži popis, jednostavno dodajte imena na njega.

Ćelija E2 ima broj grupa koje želite stvoriti. Na temelju broja koji unesete, grupe i imena u svakoj grupi dobit ćete u stupce od G do P. Od sada sam mu stvorio ovaj predložak za najviše 10 grupa.

Nakon što ste unijeli željeni broj grupa u ćeliju E2, kliknite gumb ‘Stvori timove’ za nasumično generiranje grupa imena.

Preuzmite predložak generatora slučajnih grupa

Kako ovaj Excel predložak radi

Postoji nekoliko izvrsnih Excel značajki i nekoliko pomoćnih stupaca koji čine ovaj predložak generatora slučajnih grupa u Excelu.

Evo kako se pravi:

A2: A17 sadrži popis imena koja se nasumično grupiraju.
- A1: C17 pretvoren je u Excel tablicu. To pomaže zadržati formule netaknutima kada dodajete/uklanjate imena s popisa.
Stupac B ima formulu: = RANDBETWEEN (1, COUNTA ([Nazivi])) + ROW ()/100
- Funkcija vraća slučajni broj između 1 i ukupnog broja imena na popisu (pomoću funkcije COUNTA). Tome se dodaje ROW ()/100 kako bi bio jedinstven (jer funkcija RANDBETWEEN može ispljunuti i duplikate).
Ćelija C2 ima formulu: = RANK ([@Unique], [Unique])
- Ova funkcija daje rang svakoj vrijednosti u stupcu B. Budući da su sve vrijednosti u stupcu B jedinstvene, ova formula daje jedinstveni popis cijelih brojeva koji variraju od 1 do ukupnog broja imena na popisu.
Ćelija G1 ima formulu: = IF (COLUMNS ($ G $ 1: G1)> $ E $ 2, ””, COLUMNS ($ G $ 1: G1))
- Ista formula kopira se u ćelije H1 do P1. Vraća broj stupaca između stupca G i trenutnog stupca. Dakle, G1 dobiva 1, H1 dobiva 2 itd. Također provjerava je li broj veći od vrijednosti u ćeliji E2. Ako da, onda vraća prazno mjesto.
Ćelija G2 ima formulu: = IFERROR (IF (G $ 1 ””, INDEX (Tablica1 [Imena], INDEX (Tablica1 [Rang], G $ 1+$ E $ 2*(ROWS ($ F $ 2: F2) -1)) ), ””), ””)
- Kopira se u sve ćelije u G2: P17.
  - U ćeliji G2 ova će formula pokupiti rang iz C2 i vratiti naziv na tom mjestu na popisu.
  - U ćeliji G3 odabrat će rang iz C6 (što je 1 + 1*4, gdje je 4 broj grupa koje treba formirati).
  - U ćeliji G4 odabrat će rang od C10 (što je 1 + 2*4, gdje je 4 broj grupa koje treba formirati).
- Ako je ćelija u prvom retku prazna ili je rezultat formule pogreška, vraća prazno.

Budući da je funkcija RANDBETWEEN promjenjiva, automatski će se osvježiti svaki put kada unesete promjenu na radnom listu. To može biti nepoželjno jer će svaki put promijeniti grupiranje.

Da biste to izbjegli:

Idite na Opcije datoteke.
U dijaloškom okviru Excel mogućnosti odaberite formule u oknu s lijeve strane.
U opcijama za izračun napravite Priručnik za izračun radne knjige.
Pritisnite U redu.

Sada se radni list neće osvježavati sve dok ne prisilite osvježavanje pritiskom na tipku F9.

No, kako bi izgledao bolje, postoji narančasti gumb koji osvježava kad kliknete na njega. Ovdje je u igri jednoredni VBA kôd koji se izvršava kad god pritisnete gumb.

Evo kako umetnuti ovaj gumb:

Idite na Developer -> Code -> Visual Basic. (Također možete koristiti tipkovnički prečac Alt + F11).
U VB Editoru desnom tipkom miša kliknite bilo koji objekt radne knjige i idite na Umetni -> Modul.
U prozoru koda modula kopirajte i zalijepite sljedeći kod:
```
Sub Refresh () Radni listovi ("Team Generator"). Izračunaj završnu pod
```
- Imajte na umu da je naziv radnog lista u dvostrukim navodnicima. Ako je naziv vašeg radnog lista različit, promijenite ga u kodu.
Zatvorite VB Editor.
Idite na Umetanje -> Oblici i umetnite bilo koji oblik koji želite kao gumb.
Desnom tipkom miša kliknite oblik i kliknite Dodijeli makro.
U dijaloškom okviru Dodijeli makronaredbu odaberite naziv makroa i kliknite U redu.
Formatirajte gumb kako želite.