✅ Rastgele Grup Oluşturucu Şablonu (Ücretsiz İndirme)

İçindekiler

Rastgele Grup Oluşturucu Şablonu

Bir öğretmen veya eğitmen iseniz, öğrenci/katılımcı grupları oluşturmak yaygın bir iştir. Örneğin, bir test veya ekip oluşturma etkinliği yürütmek için gruplar oluşturmak isteyebilirsiniz.

Ve çoğu durumda, bu grupların rastgele olması gerekir.

Bugün, bir grup öğrenci/katılımcı oluşturmanızı çok kolaylaştıracak bir rastgele grup oluşturucu şablonu paylaşıyorum.

Tek ihtiyacınız olan öğrenci veya katılımcı listesi ve kaç grup oluşturmak istediğinizi belirtin.

Rastgele Grup Oluşturucu Şablonu

İşte bu rastgele grup oluşturucu (veya rastgele takım oluşturucu) şablonunun nasıl çalıştığına dair bir demo:

Öğrencilerin/katılımcıların listesi A2:A17'dedir. Daha uzun bir listeniz varsa, içindeki isimleri eklemeniz yeterlidir.

Hücre E2, oluşturmak istediğiniz grup sayısına sahiptir. Girdiğiniz sayıya göre grupları ve her gruptaki isimleri G'den P'ye kadar sütunlarda alırsınız. Şu an itibariyle bu şablonu maksimum 10 grup için oluşturdum.

E2 hücresine istediğiniz grup sayısını girdikten sonra, rastgele isim grupları oluşturmak için "Ekip Oluştur" düğmesine tıklayın.

Rastgele Grup Oluşturucu Şablonunu İndirin

Bu Excel Şablonu Nasıl Çalışır?

Excel'de bu rastgele grup oluşturucu şablonunu oluşturan birkaç harika Excel özelliği ve birkaç yardımcı sütun vardır.

İşte nasıl yapılır:

A2:A17, rastgele gruplandırılacak adların listesini içerir.
- A1:C17, bir Excel Tablosuna dönüştürüldü. Bu, listeye ad eklediğinizde/çıkardığınızda formüllerin olduğu gibi kalmasına yardımcı olur.
Sütun B'de şu formül bulunur: =RANDBETWEEN(1,COUNTA([Adlar])) + SATIR()/100
- İşlev, 1 ile listedeki toplam ad sayısı arasında rastgele bir sayı döndürür (COUNTA işlevini kullanarak). Buna, benzersiz kılmak için ROW()/100 eklenir (RANDBETWEEN işlevi kopyaları da tükürebilir).
C2 hücresi şu formüle sahiptir: =RANK([@Benzersiz],[Benzersiz])
- Bu işlev, Sütun B'deki her değer için sıralamayı verir. B sütunundaki tüm değerler benzersiz olduğundan, bu formül, 1'den listedeki toplam ad sayısına kadar değişen benzersiz bir tamsayı listesi verir.
G1 hücresi şu formüle sahiptir: =EĞER(SÜTUNLAR($G$1:G1)>$E$2,””,SÜTUNLAR($G$1:G1))
- Aynı formül H1 ila P1 hücrelerinde kopyalanır. G sütunu ile geçerli sütun arasındaki sütun sayısını döndürür. Dolayısıyla G1 1, H1 2 alır ve bu böyle devam eder. Ayrıca sayının E2 hücresindeki değerden büyük olup olmadığını da kontrol eder. Evet ise, o zaman bir boşluk döndürür.
G2 hücresi şu formüle sahiptir: =EĞERHATA(EĞER(G$1”””,INDEX(Tablo1[Adlar],INDEX(Tablo1[Sıra],G$1+$E$2*(SATIR($F$2:F2)-1)) ),””),”))
- G2:P17'deki tüm hücrelere kopyalanır.
  - G2 hücresinde, bu formül C2'den sıralamayı alır ve listedeki o konumdaki adı döndürür.
  - G3 hücresinde, C6'dan (1 + 1*4 olan) sırayı seçecektir, burada 4 oluşturulacak grup sayısıdır.
  - G4 hücresinde, C10'dan (1 + 2*4 olan) sırayı seçecektir, burada 4 oluşturulacak grup sayısıdır.
- İlk satırdaki hücre boşsa veya formülün sonucu bir hataysa, boşluk döndürür.

RANDBETWEEN işlevi geçici olduğundan, çalışma sayfasında her değişiklik yaptığınızda otomatik olarak yenilenecektir. Her seferinde gruplamayı değiştireceği için bu istenmeyen bir durum olabilir.

Bundan kaçınmak için:

Dosya Seçenekleri'ne gidin.
Excel Seçenekleri iletişim kutusunda, soldaki bölmede formülleri seçin.
Calculation seçeneklerinde Workbook Calculation Manual yapın.
Tamam'ı tıklayın.

Artık, F9 tuşuna basarak bir yenilemeyi zorlayana kadar çalışma sayfası yenilenmeyecektir.

Ancak daha iyi görünmesi için, tıkladığınızda yenilemeyi yapan turuncu bir düğme var. Burada, düğmeyi her tıkladığınızda çalıştırılan tek satırlık bir VBA kodu var.

Bu düğmeyi nasıl ekleyeceğiniz aşağıda açıklanmıştır:

Geliştirici -> Kod -> Visual Basic'e gidin. (Alt + F11 klavye kısayolunu da kullanabilirsiniz).
VB Editöründe, çalışma kitabı için herhangi bir nesneye sağ tıklayın ve Ekle -> Modül'e gidin.
Modül kodu penceresinde aşağıdaki kodu kopyalayıp yapıştırın:
```
Sub Refresh() Worksheets("Team Generator"). End Sub hesaplayın
```
- Çalışma sayfasının adının çift tırnak içinde olduğuna dikkat edin. Çalışma sayfanızın adı farklıysa, kodda değiştirin.
VB Düzenleyiciyi kapatın.
Ekle -> Şekiller'e gidin ve düğme olarak istediğiniz şekli ekleyin.
Şekle sağ tıklayın ve Makro Ata'ya tıklayın.
Makro Ata iletişim kutusunda, makro adını seçin ve Tamam'a tıklayın.
Düğmeyi istediğiniz gibi biçimlendirin.