Basit Çekiliş Yapmak

Bu dosya, bir listeye kaydedilmiş isimler arasından rastgele çekiliş yapan basit bir örnektir. Birden fazla talihli belirlenecekse aynı kişinin tekrar çıkmaması için seçilen isimler ayrıca kaydedilir. Fikir vermek amacıyla hazırlanmıştır ve geliştirmeye açıktır.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• cekilis: "Basit Çekiliş Yapma" başlıklı çekiliş sayfası. Seçilen isim B4 hücresinde görünür, B3 ve C3 hücreleri makronun çalışması için kullanılır.
• veriler: A sütununda SIRA numaraları, B sütununda katılımcı isimleri bulunur. C sütunu, çekilişte seçilen isimlerin tutulması için kullanılır.

Makrolar​

Dosyada cekilis adlı bir modül vardır ve iki makro içerir. Kodda dosya silme ya da dışarıya bağlantı gibi zararlı bir işlem görünmemektedir.

• SayıÜret: veriler sayfasındaki isim sayısına göre rastgele bir sıra numarası üretir, VLookup ile bu numaranın karşılığı olan ismi bulur ve cekilis sayfasındaki B4 hücresine yazar.
• KuraÇek: Çekilişi yürüten ana makrodur. SayıÜret'i kısa bir bekleme ile tekrar tekrar çağırarak ismin değiştiği bir geri sayım etkisi oluşturur ve sonuç B4 hücresinde durur. Seçilen ismi veriler sayfasının C sütununa ekler. B3 hücresindeki değer 2 ise daha önce seçilmiş bir ismi tekrar çekmemek için yeniden çeker. C sütunu doluyken B3 değeri 2 değilse "Seçim sıfırlanıyor..." iletisi verir ve C sütunundaki kayıtları temizler.

Makrolar cekilis sayfasındaki hediye simgesine tıklanarak çalıştırılır.

Dosyada ayrıca başlangıç ve bitiş için tanımlanmış "start" ve "end" adlı iki ad vardır, ancak bunlar geçersiz (#REF!) bir başvuruya işaret etmektedir ve çekilişin çalışması için kullanılmamaktadır.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. veriler sayfasında çekilişe katılacak isimleri listeye yazın.
3. cekilis sayfasına geçin.
4. Hediye simgesine tıklayın, B4 hücresinde şanslı isim görüntülenir.
5. Birden fazla talihli belirlemek için çekilişi tekrarlayın. Aynı kişinin tekrar çıkmaması için seçilen ismin veriler sayfasındaki C sütununa kaydedildiğini kontrol edin.