Skip to main content

Kutools for Office — Bir Paket. Beş Araç. Daha Fazla İş Yapın.

Excel'de şanslı çekiliş isimleri nasıl yapılır?

Author Xiaoyang Last modified

İşyeri etkinliklerinde, takım toplantılarında veya özel etkinliklerde, genellikle büyük bir isim listesinden rastgele birkaç şanslı katılımcı veya kazanan seçmek gerekir — örneğin, takım tombalası, rastgele ödüller veya gönüllüler seçmek için. Özellikle isim sayısı arttıkça, dijital listelerle uğraşırken elle isim çekmek verimsiz veya pratik olmayabilir. Neyse ki, Excel, listenizden rastgele seçim yapmak için çeşitli pratik yöntemler sunar, bu da size sayfalarınızın içinde şeffaf, tekrarlanabilir ve özelleştirilebilir şanslı çekiliş deneyimleri oluşturma imkanı verir. Bu makale, size Excel'de isimleri rastgele seçmenin birkaç etkili yolunu anlatacak, senaryolarını, avantajlarını ve dikkat edilmesi gereken noktaları vurgulayacak ve yolda sık yapılan hatalardan kaçınmanıza yardımcı olacak ipuçlarını paylaşacaktır.

Formül kullanarak şanslı çekiliş için rastgele isimler çıkarma

Kutools for Excel ile şanslı çekiliş için rastgele isimler seçme

VBA kodu kullanarak şanslı çekiliş için rastgele isimler çıkarma

Alternatif: RAND fonksiyonunu kullanarak ve sıralama yaparak rastgele isimler çıkarma


Formül kullanarak şanslı çekiliş için rastgele isimler çıkarma

Eğer bir isim sütunundan belirli bir sayıda ismi (örneğin, 3 kazanan) rastgele seçmeniz gerekiyorsa, karmaşık bir formül yaklaşımı kullanabilirsiniz. Bu yaklaşım, yinelenen seçimleri otomatik olarak önler ve çalışma kitabı her yeniden hesaplandığında sonucu günceller. Özellikle orta büyüklükteki bir listeden küçük, sabit sayıda isim çekmek istediğinizde uygundur, özellikle de sürecin izlenebilir olmasını isteyip ek eklentilere veya koda ihtiyaç duymadığınız durumlarda.

Bu yöntemi kullanmak için aşağıdaki adımları izleyin:

İlk şanslı çekiliş sonucunu almak istediğiniz boş bir hücreye (örneğin, C2) aşağıdaki formülü girin:

=IF(ROWS(C$2:C2)>B$2,"",INDEX(A$2:A$16,AGGREGATE(15,6,((ROW(A$2:A$16)-ROW(A$2)+1)/ISNA(MATCH(A$2:A$16,C$1:C1,0))),RANDBETWEEN(1,ROWS(A$2:A$16)-COUNTA(C$1:C1)+1))))

Formülü girdikten sonra, çekmek istediğiniz isim sayısına göre dolgu tutamacını aşağı doğru sürükleyin (örneğin, 3 isim çekmek istiyorsanız, 3 satır aşağıya C4'e kadar sürükleyin). Çekilen isimler otomatik olarak hücrelerde görünecektir. Ekran görüntüsüne bakın:

Extract random names with a formula

Parametre açıklamaları ve pratik ipuçları:

  • Bu formülde:
    • A2:A16 — bu, kaynak isim listenizdir. Bu aralığı gerçek isim verilerinizle eşleşecek şekilde değiştirin.
    • B2 — bu hücre, rastgele seçmek istediğiniz toplam isim sayısını içermelidir (örneğin, 3 girin).
    • C2 — bu, formülü girdiğiniz sonuç listenizin ilk hüresidir.
    • C1 — bu, formülün doğru çalışması için gereken, formülün hemen üstündeki hücredir, boş bırakılsa bile gereklidir.
  • Bu yöntem dinamiktir: Eğer yeni bir rastgele isim setine ihtiyacınız varsa, sadece F9'a basın ve yeni bir sonuç seti alın.
  • Formüllerin çalışma sayfası her yeniden hesaplandığında değişmesini önlemek için, sonuçları kopyalayıp Yapıştır Özel > Değerler'i kullanarak çekilen isimleri statik hale getirmek isteyebilirsiniz.
  • Eğer isim listeniz daha büyükse veya çekilişi birden fazla kez yapmak istiyorsanız, sonuç sütununun isim listenizle çakışmamasına dikkat edin, aksi takdirde hatalara neden olabilir.

Uyarı: Hücre referanslarının doğru olduğundan ve aralıkların gerçek verilerinizle eşleştiğinden emin olun. Çalışma sayfası yapısını değiştirmek veya referans hücreleri silmek formülün bozulmasına neden olabilir.


Kutools for Excel ile şanslı çekiliş için rastgele isimler seçme

Eğer formül yazmadan basit ve etkileşimli bir yöntemi tercih ediyorsanız, Kutools for Excel, Sort Range Randomly özelliğiyle doğrudan isimleri rastgele seçmenizi sağlar. Bu çözüm, özellikle teknik olmayan kullanıcılar için veya görsel olarak ve hızlı bir şekilde çalışmak istediğinizde, özellikle büyük veri setleriyle çalışırken veya çekilişi sık sık tekrarlamanız gerektiğinde çok kullanışlıdır.

Kutools for Excel, karmaşık görevleri basitleştirmek için 300'den fazla gelişmiş özellik sunar ve yaratıcılığı ve verimliliği artırır. Yapay zeka yetenekleriyle entegre olarak, Kutools görevleri hassas bir şekilde otomatikleştirir ve veri yönetimi işlerini kolaylaştırır. Kutools for Excel hakkında detaylı bilgi...  Ücretsiz deneme...

Kutools for Excel yüklendikten sonra aşağıdaki adımları izleyin:

1. Şanslı çekiliş için kullanmak istediğiniz tüm isim listesini seçin. Ardından Kutools > Aralık > Sırala / Seçim Aralığını Rastgele'ye tıklayın. Ekran görüntüsüne bakın:

click Sort / Select Range Randomly feature of kutools

2. Sırala/Seçim Aralığını Rastgele iletişim kutusunda, Seç sekmesine gidin. Burada, rastgele çekmek istediğiniz isim sayısını Seçilecek Hücre Sayısı kutusuna yazın (örneğin, 3), ardından Seçim Türü bölümünde Rastgele hücreleri seç'i seçin. Bu, istediğiniz sayıda benzersiz ismi rastgele seçmenizi sağlar. Ekran görüntüsüne bakın:

specify the options in the dialog box

3. Tamam'a tıklayın. Belirlenen sayıda isim rastgele seçilecek ve listede vurgulanacaktır, böylece kazananları veya seçilen katılımcıları kolayca tanımlayabilirsiniz. Ekran görüntüsüne bakın:

the specific number of names are selected

Bu yöntem, kullanımı kolaylığı ve güvenilirliği ile öne çıkar, ayrıca isteğe bağlı olarak isimleri sıralama veya karıştırma seçenekleri sunar. Bu özelliği gerektiği kadar kullanabilirsiniz ve elle hesaplama sırasında sık yapılan hataları veya tekrarlamaları önler. Formüller veya kodlama ile uğraşmadan hızlı bir çözüm isteyenler için idealdir.

Not: Aralığınızda ilgisiz diğer verileri seçmemeye dikkat edin, çünkü yalnızca vurgulanan hücreler kazanan isimlerinizi temsil eder. Vurgulanan isimler, daha fazla kullanıma yönelik olarak kopyalanabilir veya işaretlenebilir.

Kutools for Excel'i indirmek ve ücretsiz deneme sürümünü hemen başlatmak için tıklayın!

Özetle, Kutools for Excel kullanmak, rastgele çekilişleri yönetmek için kullanıcı dostu ve oldukça verimli bir yöntem sağlar. Özellikle güvenilirlik ve kullanımı kolaylık en önemli konular olduğunda veya farklı grup boyutlarıyla birden fazla çekiliş yapmanız gerektiğinde uygundur.


VBA kodu kullanarak şanslı çekiliş için rastgele isimler çıkarma

Gelişmiş senaryolar için veya süreci daha esnek bir şekilde otomatikleştirmek istediğinizde, VBA kodu listeden rastgele isimler çıkarmak için kullanılabilir. Bu çözüm, Excel'in Geliştirici seçenekleriyle rahat hissedenler için uygundur ve çekilişi tekrarlamak veya prosedürleri değiştirmek istediğinizde —örneğin sonuçları belirli bir konuma çıkarmak veya daha büyük listelerle başa çıkmak— faydalıdır.

Şanslı çekiliş için VBA'yi kullanmak için aşağıdaki adımları izleyin:

1. Microsoft Visual Basic for Applications penceresini açmak için Alt + F11 tuşlarına basın.

2. Yeni bir modül oluşturmak için Ekle > Modül'e tıklayın, ardından aşağıdaki VBA kodunu modül penceresine kopyalayıp yapıştırın.

VBA kodu: Listedeki rastgele isimleri çıkar:

Public Sub LuckyDraw()
    Dim I, J, xRnd As Long
    Dim xSRg, xDRg As Range
    Dim xDic As New Dictionary
    Dim xnum, xLastRow As Long
    On Error Resume Next
    Set xSRg = Application.InputBox("Please select the data list:", "KuTools for Excel", Selection.Address, , , , , 8)
    If xSRg Is Nothing Then Exit Sub
    Set xDRg = Application.InputBox("Please selecta cell to put the result:", "KuTools for Excel", , , , , , 8)
    If xDRg Is Nothing Then Exit Sub
    xLastRow = xSRg.Rows.Count
    Set xSRg = xSRg(1)
    Set xDRg = xDRg(1)
    xnum = Range("B2")
    If xnum < 1 Then Exit Sub
    J = 0
    For I = 1 To xnum
LabExit:
        xRnd = Int(Rnd() * xLastRow)
        If xDic.Exists(xRnd) Then GoTo LabExit
        xDic.Add xRnd, ""
        xDRg.Offset(J, 0).Value = xSRg.Offset(xRnd, 0).Value
        J = J + 1
    Next
End Sub

Parametre açıklaması: Kodda, B2, rastgele çıkarılacak isim sayısını girdiğiniz hücredir. Hücre referanslarını gerektiğinde değiştirebilirsiniz.

3. Kodu yapıştırdıktan sonra, Araçlar > Referanslar'a gidin. Açılan iletişim kutusunda, Mevcut Referanslar listesinde Microsoft Scripting Runtime seçeneğini işaretleyin. Bu adım, kodda kullanılan komut dosyası sözlüğünü etkinleştirmek için gereklidir. Ekran görüntüsüne bakın:

click Tools > References, then check Microsoft Scripting Runtime option

4. İletişim kutusunu kapatmak için Tamam'a tıklayın, ardından kodu çalıştırmak için F5'e basın. Çekiliş yapmak istediğiniz isimleri içeren veri listesini seçmenizi isteyen bir uyarı kutusu açılacaktır. Ekran görüntüsüne bakın:

vba code to select the data list

5. Tamam'a tıklayın. Çekiliş sonuçlarının görüntüleneceği hedef hücreyi seçmenizi isteyen başka bir uyarı kutusu açılacaktır. Ekran görüntüsüne bakın:

vba code to select a cell to put the result

6. İşlemi tamamlamak için Tamam'a tıklayın. Rastgele seçilen isimler, belirttiğiniz hücreden başlayarak hemen çıktı olarak verilecektir. Ekran görüntüsüne bakın:

the desired number of names are created randomly

Pratik ipuçları: Kodu çalıştırmadan önce çalışmanızı kaydettiğinizden emin olun. Hata alırsanız, referans ayarlarınızı ve hücre aralığı seçimlerinizi kontrol edin. Bu yöntem size daha fazla kontrol sağlar, ancak temel VBA işlemlerine aşina olan kullanıcılar için en uygunudur.

Avantajlar ve dezavantajlar: VBA yaklaşımı, özelleştirme için güçlüdür ve eski kazananları hariç tutma, bildirimleri otomatikleştirme gibi gelişmiş gereksinimler için uyarlanabilir. Ancak, temel VBA bilgisi gerektirir ve çevrenizde makrolara izin verilmediği sürece uygun olmayabilir.


Alternatif: RAND fonksiyonunu kullanarak ve sıralama yaparak rastgele isimler çıkarma

Yukarıdaki yöntemlerin yanı sıra, pratik ve görsel bir başka çözüm de Excel'in RAND fonksiyonunu sıralama ile birleştirmektir. Bu yöntem basittir, karmaşık yapıda formüller gerektirmez, eklenti veya kodlama içermez — bu da herhangi bir Excel sürümünde hızlı, ara sıra yapılan çekilişler için uygundur. Özellikle rastgelelemenin nasıl gerçekleştiğini manuel olarak görmek ve doğrulamak istediğinizde faydalıdır.

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

  • İsim listenizin yanına bir yardımcı sütun ekleyin ve yardımcı sütunun ilk hücresine =RAND() yazın (örneğin, isimleriniz A2:A16'daysa, B2'ye =RAND() yazın).
  • Formülü listenizin tamamına kopyalayın. Her hücre rastgele bir ondalık sayı ile doldurulacaktır.
  • Orijinal isimleriniz ve RAND yardımcı sütununuzu seçin.
  • Veri sekmesine gidin ve Sırala'yı seçin. Sıralamayı, RAND değerlerini içeren yardımcı sütunu kullanacak şekilde ayarlayın, en küçükten büyüğe (veya tersi) sıralayın. Bu, tüm listeyi rastgele yeniden sıralayacaktır.
  • Sıralandıktan sonra, yeniden sıralanmış listeden ilk N ismi şanslı çekiliş kazananları olarak seçin.

İpuçları ve notlar: Çalışma sayfanız her hesaplandığında, RAND fonksiyonu güncellenir. Eğer çekiliş sonuçlarını dondurmak istiyorsanız, isimleri kopyalayıp başka bir yere değer olarak yapıştırın. Başka bir çekiliş yapmak isterseniz, sadece yeniden hesaplayın (F9).

Avantajlar: Bu yaklaşım, uygulaması son derece kolaydır, ekstra bir kurulum gerektirmez ve canlı çekilişler sırasında adil olduğunu göstermek için açıktır. Ancak, çekilişi sık sık tekrarlamanız gerekiyorsa veya eski kazananlar listesi gibi gelişmiş özellikler gerektiren durumlarda, formüller, VBA veya Kutools daha iyi işleyecektir.


Özetle, Excel, şanslı çekilişler için rastgele isim seçmek üzere birden fazla yöntem sunar. Yöntem seçimi, basitlik, özelleştirilebilirlik veya görsel etkileşim tercihinize bağlıdır. Doğrudan el ile kullanım için RAND ve sıralama veya Kutools for Excel önerilir. Dinamik ve yeniden kullanılabilir çözümler için formüller veya VBA ekstra esneklik sağlar. Hata veya beklenmedik sonuçlarla karşılaşırsanız, hücre referanslarınızı, aralık seçimlerinizi kontrol edin ve gerekli eklentilerin veya makro ayarlarının etkin olduğundan emin olun. En iyi sonuçlar için, çekilişe başlamadan önce verilerinizi her zaman kaydedin ve hataları önlemek için sonuçları doğrulayın.


En İyi Ofis Verimlilik Araçları

🤖 Kutools AI Asistanı: Veri analizinde devrim yaratın – Akıllı Yürütme | Kod Oluştur | Özel Formüller Oluştur | Verileri Analiz Et ve Grafikler Oluştur | Kutools Fonksiyonlarını Çağır
Popüler Özellikler: Yinelenenleri Bul, Vurgula veya İşaretle | Boş Satırları Sil | Sütunları veya Hücreleri Veriyi Kaybetmeden Birleştir | Formül olmadan Yuvarla...
Süper ARA: Çoklu Kriter VLookup | Çoklu Değer VLookup | Çoklu sayfa araması | Bulanık Eşleme....
Gelişmiş Açılır Liste: Hızlıca Açılır Liste Oluştur | Bağımlı Açılır Liste | Çoklu seçimli Açılır Liste....
Sütun Yöneticisi: Belirli Sayıda Sütun Ekle | Sütunları Taşı | Gizli Sütunların Görünürlük Durumunu Değiştir | Aralıkları & Sütunları Karşılaştır...
Öne Çıkan Özellikler: Izgara Odaklama | Tasarım Görünümü | Gelişmiş formül çubuğu | Çalışma Kitabı & Çalışma Sayfası Yöneticisi | Otomatik Metin Kütüphanesi | Tarih Seçici | Veri Birleştir | Hücreleri Şifrele/Şifre Çöz | Listeye Göre E-posta Gönder | Süper Filtre | Özel Filtre (kalın/italik/üstü çizili filtreleme...)...
En İyi15 Araç Takımı:12 Metin Aracı (Metin Ekle, Belirli Karakterleri Sil, ...) | 50+ Grafik Türü (Gantt Grafiği, ...) | 40+ Pratik Formül (Doğum tarihine dayanarak yaş hesapla, ...) | 19 Ekleme Aracı (QR Kodu Ekle, Yoldan Resim Ekle, ...) | 12 Dönüşüm Aracı (Kelimeye Dönüştür, Para Birimi Dönüştürme, ...) | 7 Birleştirme & Bölme Aracı (Gelişmiş Satırları Birleştir, Hücreleri Böl, ...) | ... ve dahası
Kutools'u tercih ettiğiniz dilde kullanın – İngilizce, İspanyolca, Almanca, Fransızca, Çince ve40+ diğer dili destekler!

Kutools for Excel ile Excel becerilerinizi güçlendirin ve benzersiz bir verimlilik deneyimi yaşayın. Kutools for Excel, üretkenliği artırmak ve zamandan tasarruf etmek için300'den fazla Gelişmiş Özellik sunuyor. İhtiyacınız olan özelliği almak için buraya tıklayın...


Office Tab, Ofis uygulamalarına sekmeli arayüz kazandırır ve işinizi çok daha kolaylaştırır.

  • Word, Excel, PowerPoint'te sekmeli düzenleme ve okuma işlevini etkinleştirin.
  • Yeni pencereler yerine aynı pencerede yeni sekmelerde birden fazla belge açıp oluşturun.
  • Verimliliğinizi %50 artırır ve her gün yüzlerce mouse tıklaması azaltır!

Tüm Kutools eklentileri. Tek kurulum

Kutools for Office paketi, Excel, Word, Outlook & PowerPoint için eklentileri ve Office Tab Pro'yu bir araya getirir; Office uygulamalarında çalışan ekipler için ideal bir çözümdür.

Excel Word Outlook Tabs PowerPoint
  • Hepsi bir arada paket — Excel, Word, Outlook & PowerPoint eklentileri + Office Tab Pro
  • Tek kurulum, tek lisans — dakikalar içinde kurulun (MSI hazır)
  • Birlikte daha verimli — Ofis uygulamalarında hızlı üretkenlik
  • 30 günlük tam özellikli deneme — kayıt yok, kredi kartı yok
  • En iyi değer — tek tek eklenti almak yerine tasarruf edin