✅ Шаблон за генератор на произволни групи (безплатно изтегляне)

Съдържание

Шаблон за генератор на произволни групи

Ако сте учител или обучител, създаването на групи от ученици/участници е често срещана задача. Например, може да искате да създадете групи за провеждане на тест или тиймбилдинг дейност.

И в повечето случаи се нуждаете тези групи да бъдат произволни.

Днес споделям шаблон за генератор на произволни групи, който ще ви улесни при създаването на група студенти/участници.

Всичко, от което се нуждаете, е списъкът на учениците или участниците и посочете колко групи искате да създадете.

Шаблон за генератор на произволни групи

Ето демонстрация как работи този шаблон за генератор на произволни групи (или генератор на произволни екипи):

Списъкът на учениците/участниците е в А2: А17. Ако имате по -дълъг списък, просто добавете имената в него.

Клетка E2 има броя групи, които искате да създадете. Въз основа на въведения номер ще получите групите и имената във всяка група в колони G до P. Към момента създадох този шаблон за максимум 10 групи.

След като въведете желаните групи в клетка E2, щракнете върху бутона „Създаване на екипи“, за да генерирате произволно групите с имена.

Изтеглете шаблона за генератор на произволни групи

Как работи този шаблон на Excel

Има няколко готини функции на Excel и няколко помощни колони, които правят този шаблон за генератор на произволни групи в Excel.

Ето как се прави:

A2: A17 съдържа списък с имена, които трябва да бъдат групирани на случаен принцип.
- A1: C17 е преобразуван в таблица на Excel. Това помага да запазите формулите непокътнати, когато добавяте/премахвате имена от списъка.
Колона Б има формулата: = RANDBETWEEN (1, COUNTA ([Имена])) + ROW ()/100
- Функцията връща произволно число между 1 и общия брой имена в списъка (използвайки функцията COUNTA). Към това се добавя ROW ()/100, за да стане уникален (тъй като функцията RANDBETWEEN може да изплюе и дубликати).
Клетката C2 има формулата: = RANK ([@Unique], [Unique])
- Тази функция дава ранг за всяка стойност в колона B. Тъй като всички стойности в колона B са уникални, тази формула дава уникален списък от цели числа, които варират от 1 до общия брой имена в списъка.
Клетката G1 има формулата: = IF (КОЛОНИ ($ G $ 1: G1)> $ E $ 2, ””, КОЛОНИ ($ G $ 1: G1))
- Същата формула се копира в клетки H1 до P1. Той връща броя на колоните между колона G и текущата колона. Следователно, G1 получава 1, H1 получава 2 и така нататък. Той също така проверява дали числото е по -голямо от стойността в клетка E2. Ако да, тогава връща празно.
Клетката G2 има формулата: = IFERROR (IF (G $ 1 ””, INDEX (Таблица1 [Имена], INDEX (Таблица1 [Ранг], G $ 1+$ E $ 2*(ROWS ($ F $ 2: F2) -1)) ), ””), ””)
- Той се копира във всички клетки в G2: P17.
  - В клетка G2 тази формула ще вземе ранга от C2 и ще върне името на тази позиция в списъка.
  - В клетка G3 тя ще избере ранга от C6 (което е 1 + 1*4, където 4 е броят на групите, които трябва да се формират).
  - В клетка G4 тя ще избере ранга от C10 (което е 1 + 2*4, където 4 е броят на групите, които трябва да се формират).
- Ако клетката в първия ред е празна или резултатът от формулата е грешка, тя връща празно.

Тъй като функцията RANDBETWEEN е нестабилна, тя автоматично ще се опреснява всеки път, когато направите промяна в работния лист. Това може да е нежелателно, тъй като всеки път ще променя групирането.

За да избегнете това:

Отидете на Опции за файл.
В диалоговия прозорец Опции на Excel изберете формули в прозореца вляво.
В опциите за изчисление направете Ръководство за изчисляване на работна книга.
Щракнете върху OK.

Сега работният лист няма да се опреснява, докато не принудите опресняване, като натиснете клавиша F9.

Но за да изглежда по -добре, има оранжев бутон, който прави опресняването, когато щракнете върху него. Тук има едноредов VBA код, който се изпълнява всеки път, когато натиснете бутона.

Ето как да вмъкнете този бутон:

Отидете на Developer -> Code -> Visual Basic. (Можете също да използвате клавишната комбинация Alt + F11).
В редактора на VB щракнете с десния бутон върху някой от обектите на работната книга и отидете на Вмъкване -> Модул.
В прозореца с код на модула копирайте и поставете следния код:
```
Sub Refresh () Работни листове ("Team Generator"). Изчислете End Sub
```
- Обърнете внимание, че името на работния лист е в двойни кавички. Ако името на работния ви лист е различно, променете го в кода.
Затворете редактора на VB.
Отидете на Вмъкване -> Форми и вмъкнете всяка форма, която искате като бутон.
Щракнете с десния бутон върху формата и щракнете върху Присвояване на макрос.
В диалоговия прозорец Присвояване на макрос изберете името на макроса и щракнете върху OK.
Форматирайте бутона така, както искате.