Toplu Mail Gönderme

Bu dosya, Liste sayfasındaki kişilerden doğum günü bugüne denk gelenlere Outlook üzerinden otomatik olarak e-posta hazırlayıp göndermek için hazırlanmış makrolu bir Excel çalışma kitabıdır.

Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir. Gönderim için bilgisayarınızda Outlook kurulu olmalıdır.

Dosyanın içeriği​

• Liste: A1:C4 aralığında örnek veriler bulunur. A sütununda Ad Soyad, C sütununda Mail Adresi yer alır (örnek kayıtlar: Ali Veli, Hasan Hüseyin). Makro, B sütunundaki tarihi doğum günü olarak okur; ancak özetteki örnek veride B sütununda bir değer görünmediği için doğum tarihlerini sizin girmeniz gerekir.

Dosyada formül, tablo, grafik veya tanımlı ad bulunmaz; tüm işlem makro ile yapılır.

Makrolar​

Dosyada Module1 adlı tek bir modül ve üç prosedür vardır.

• auto_open: Dosya açıldığında çalışır. İçindeki menu çağrısı yorum satırı olduğu için şu an hiçbir işlem yapmaz. Dosya açılır açılmaz gönderim yapılmasını isterseniz bu satırdaki yorum işaretini kaldırabilirsiniz.
• menu: Dogum_Gunlerini_Mail_At prosedürünü çağırır.
• Dogum_Gunlerini_Mail_At: Listeyi 2. satırdan A sütunundaki son dolu satıra kadar tarar. Her satırda bugünün gün ve ay bilgisini B sütunundaki tarihle karşılaştırır. Eşleşme varsa Outlook uygulamasını başlatır, "Doğum Günün Kutlu Olsun" konulu ve kişinin adını içeren HTML biçimli bir kutlama iletisi oluşturur, alıcı olarak C sütunundaki adresi yazar, iletiyi ekranda gösterir ve gönderir.

Kodda dosya silme, dışarıya bağlantı kurma gibi zararlı görünen bir işlem yoktur. Makro yalnızca Outlook üzerinden ileti oluşturur ve gönderir. Mesaj metni ve imza ("ExcelDepo") kod içinde yazılıdır, değiştirmek için VBA düzenleyicisinde ilgili satırı güncellemeniz gerekir.

Nasıl kullanılır​

1. Dosyayı açın ve makroları etkinleştirin.
2. Liste sayfasına ad soyad (A), doğum tarihi (B) ve mail adresi (C) bilgilerini 2. satırdan itibaren girin.
3. Alt+F8 tuşlarıyla makro listesini açın ve menu ya da Dogum_Gunlerini_Mail_At makrosunu çalıştırın.
4. Bugün doğum günü olan kişiler için Outlook iletileri oluşturulup gönderilir.
5. Denemeden önce örnek mail adreslerini kendi test adresinizle değiştirmeniz önerilir.