Müşterilerinize, müşterilerinize, arkadaşlarınıza veya diğer kişilere kişiselleştirilmiş toplu e-postalar göndermeniz mi gerekiyor? Bunu tek bir tıklama ile yapmak ister misiniz? Bu mümkün! Microsoft Excel'de tüm bunları yapan sihirli bir araç var . Uygulamalar için Visual Basic, diğer adıyla Excel VBA'dır.
Outlook'tan Excel VBA kullanarak toplu e-posta göndermeyi öğrenmek için okumaya devam edin . Fazlası var! Aşağıdaki öğreticide belirtilen en basit adımları izleyerek bunu uygulayabilirsiniz. Hadi kazalım!

Excel VBA Kullanarak Outlook'tan Toplu E-posta Nasıl Gönderilir?
Mevcut öğretici, size Excel'den toplu e-posta göndermeyi otomatikleştirmek için ihtiyacınız olan VBA kodunu sağlayacaktır. Tek yapmanız gereken, verilerinizi tek bir Excel dosyasında toplamak ve bazı hızlı biçimlendirmeler yapmak.
Çalıştıracağınız VBA programı, e-posta gönderme uygulaması olarak Microsoft Outlook'u kullanacaktır. Bu nedenle, bilgisayarınıza Outlook'u yüklemeniz ve yapılandırmanız gerekir. VBA kodu, web tarayıcısı tabanlı Outlook programını kullanamaz.
Excel dosyası ve Outlook uygulamasıyla hazır olduğunuzda şu adımları gerçekleştirin:
- Toplu e-posta çalışma sayfasını 6 sütun halinde düzenleyin.
- A1 satırına sütun başlıklarını yazın: Email To (A); E-posta CC (B); E-posta Konusu (C); E-posta Gövdesi (D), Ek (E), Durum (F).
- A sütunu başlığı altındaki tüm “Adreslere” ekleyin . İsterseniz binlerce e-posta ekleyebilirsiniz.
- Benzer şekilde, B sütunu başlığının altına “CC Adresleri” yazın .
- E-posta konu satırının kişiselleştirilmesinin zamanı geldi. C sütunu başlığı altında her kişi için özel e-posta konuları ekleyebilirsiniz .
- Aynısı e-posta gövde içeriği için de geçerlidir. E-posta içeriğini D sütunu başlığının altındaki satırlara kopyalayıp yapıştırın .
- Dosya eki konumlarını E sütun başlığının altına kopyalayıp yapıştırın .
- Ek konumunu almak için Shift tuşuna basın ve bilgisayarınızdaki hedef dosyayı seçin.
- Şimdi, PC panosuna dosya adresini kopyalamak için sağ tıklayın ve Yol olarak kopyala'yı seçin.
- Artık adresi doğrudan E sütununun satırlarına yapıştırabilirsiniz.
- VBA kodu durumları otomatik olarak dolduracağından F sütununu boş bırakın .

- Excel sayfasını Makro özellikli bir dosya olarak kaydedin.
- Şimdi, VBA kod düzenleyicisini getirmek için Alt+F11 tuşlarına basın.
- Üst menüde Araçlar'a tıklayın ve ardından Referanslar'ı seçin .
- Aşağıdaki listede Microsoft Office 16.0 Nesne Kitaplığı'nı arayın ve kutuyu işaretleyin.
- Outlook'u VBA için bir nesne olarak kaydetmek için Tamam'ı tıklayın .

- Şimdi Ekle'ye tıklayın ve ardından bir kod düzenleyici açmak için Modül'ü seçin .
- Aşağıda belirtilen kodu Modül'e kopyalayıp yapıştırın .
Alt Send_Bulk_Mails() Dim sh Çalışma Sayfası Kümesi Olarak sh = ThisWorkbook.Sheets("Worksheet_Name") Dim i Tamsayı Olarak Dim OA Nesne Olarak Dim msg As Nesne Kümesi OA = CreateObject("outlook.application") Dim last_row Tamsayı olarak last_row = Uygulama. CountA(sh.Range("A:A")) i = 2 için Last_row'a msg = OA.createitem(0) msg.to = sh.Range("A" & i).Value msg.cc = sh. Range("B" & i).Value msg.Subject = sh.Range("C" & i).Value msg.body = sh.Range("D" & i).Value If sh.Range("E" & i).Value <> "" Ardından msg.attachments.Add sh.Range("E" & i).Value End If msg.send sh.Range("F" & i).Value = "Sent" Sonraki i MsgBox "Tüm e-postalar gönderildi" End Sub
- Kod satırı 3'te (" Çalışma Sayfası_Adı ") yazdığı yere alt çizgilerle ayırarak geçerli çalışma sayfası adını girin .
- Komut dosyasını kaydetmek için menüden Kaydet'i tıklayın .
- Makroyu çalıştırmak için F5'e basabilirsiniz ; Excel, e-postaları Outlook aracılığıyla otomatik olarak gönderir.

- Bu makroya daha sonra Excel şerit menüsünün Geliştirici sekmesinden de erişebilirsiniz .
Çözüm
Artık Outlook'tan Excel VBA öğreticisini kullanarak nasıl toplu e-posta göndereceğinizi öğrendiğinize göre, manuel e-posta ile zaman kaybetmeden toplu e-postaları kolayca gönderebilirsiniz.
Excel için başka bir VBA hilesi öğrenmek ister misiniz? VBA kullanarak Excel'de yazım denetimini nasıl otomatikleştireceğinizi öğrenmek için bu öğreticiyi inceleyin .