Yaklaşan Tarihi Hatırlatma, dosya her açıldığında A sütunundaki tarihleri bugünün tarihiyle karşılaştırır ve süresi yaklaşan kayıtlar için Outlook üzerinden hatırlatma e-postası hazırlayıp gönderir. Amaç, bu işlemin makro ile nasıl yapıldığını göstermektir; adresler, metin ve ayarlar kendi kullanımınıza göre uyarlanır.
Dosyanın içeriği
- uye-listesi: A1:B5 aralığında Tarih başlığı ve örnek tarihler (30.09.2022, 31.10.2022, 28.09.2022, 05.11.2022) bulunur. Makro, alıcı adresini tarihin sağındaki B sütunundan, "Gönderildi" notunu ise D sütunundan okur ve yazar.
- mail-bülteni: E-postanın konu ve metin alanlarını tutar. Adlandırılmış hücreler: konu (A1), alan1 (A2), alan2 (A3), alan3 (A4).
Makrolar
Dosya makro içerir, açarken makroları etkinleştirmeniz gerekir.- Workbook_Open: Dosya açılınca otomatik çalışır. uye-listesi sayfasında A2'den son dolu satıra kadar her tarihi kontrol eder; tarih ile bugün arasındaki fark 30 günden küçük veya eşitse bir Outlook e-postası oluşturur. Alıcı B sütunundaki adrestir, konu konu hücresinden, metin alan1, alan2, alan3 hücrelerinden alınır. Gövde HTML biçimindedir ve dış bağlantı içerir. E-posta Outlook'ta tanımlı 8. hesaptan gönderilir, ardından ilgili satırın D sütununa "Gönderildi" yazılır ve "E-Postalar Gönderilmiştir" mesajı gösterilir.
- alovelo: Elle çalıştırılan toplu gönderim makrosudur. Tarih şartı aramadan listedeki tüm satırlar için e-posta oluşturup gönderir.
- Bekle: Belirli bir süre bekleme işlevi sağlayan yardımcı fonksiyondur; kodda kullanılmamaktadır.
Nasıl kullanılır
- Dosyayı açmadan önce Outlook'ta hesabınızın tanımlı olduğundan emin olun.
- uye-listesi sayfasına tarihleri ve yanındaki B sütununa alıcı e-posta adreslerini girin.
- mail-bülteni sayfasında konu ve metin hücrelerini düzenleyin.
- Gönderim hesabı için koddaki Accounts.Item(8) numarasını kendi Outlook hesabınızın sırasına göre değiştirin; HTML şablonu da aynı kod içinde düzenlenir.
- Dosyayı kaydedip yeniden açın ve makroları etkinleştirin.