So senden Sie Massen-E-Mails aus Outlook mit Excel VBA

Müssen Sie Ihren Kunden, Kunden, Freunden oder anderen Kontakten personalisierte Massen-E-Mails zustellen? Möchten Sie das mit einem einzigen Klick tun? Das ist möglich! In Microsoft Excel gibt es ein magisches Tool , das all dies erledigt. Es ist Visual Basic für Applikationen, auch bekannt als Excel VBA.

Lesen Sie weiter, um zu erfahren, wie Sie mit Excel VBA Massen-E-Mails aus Outlook versenden . Es gibt mehr! Sie können dies üben, indem Sie die einfachsten Schritte befolgen, die im folgenden Tutorial aufgeführt sind. Lasst uns eintauchen!

So senden Sie Massen-E-Mails aus Outlook mit Excel VBA

Das aktuelle Tutorial stellt Ihnen den VBA-Code zur Verfügung, den Sie zum Automatisieren des Massen-E-Mail-Versands aus Excel benötigen. Sie müssen lediglich Ihre Daten in einer Excel-Datei sammeln und eine schnelle Formatierung durchführen.

Das von Ihnen ausgeführte VBA-Programm verwendet Microsoft Outlook als E-Mail-Versand-App. Daher müssen Sie Outlook auf Ihrem Computer installieren und konfigurieren. Der VBA-Code kann das webbrowserbasierte Outlook-Programm nicht verwenden.

Sobald Sie mit der Excel-Datei und der Outlook-App fertig sind, führen Sie die folgenden Schritte aus:

• Organisieren Sie das Massen-E-Mail-Arbeitsblatt in 6 Spalten.
• Geben Sie die Spaltenüberschriften in Zeile A1 ein: E-Mail an (A); E-Mail CC (B); E-Mail-Betreff (C); E-Mail-Text (D), Anhang (E), Status (F).
• Fügen Sie alle „Anadressen“ unter der Überschrift von Spalte A hinzu . Sie können bei Bedarf Tausende von E-Mails hinzufügen.
• Geben Sie in ähnlicher Weise die „CC-Adressen“ unter der Überschrift von Spalte B ein .
• Es ist Zeit für die Personalisierung der E-Mail-Betreffzeile. Sie können für jeden Kontakt unter der Überschrift der Spalte C benutzerdefinierte E-Mail-Betreffs hinzufügen .
• Das Gleiche gilt für den Inhalt des E-Mail-Textes. Kopieren Sie den E-Mail-Inhalt und fügen Sie ihn in die Zeilen unter der Überschrift von Spalte D ein.
• Kopieren Sie die Speicherorte der Dateianhänge und fügen Sie sie unterhalb der Spaltenüberschrift E ein.
• Um den Speicherort des Anhangs zu ermitteln, drücken Sie die Umschalttaste und wählen Sie die Zieldatei auf Ihrem Computer aus.
• Klicken Sie nun mit der rechten Maustaste und wählen Sie Als Pfad kopieren , um die Dateiadresse in die PC-Zwischenablage zu kopieren.
• Sie können die Adresse nun direkt in die Zeilen der Spalte E einfügen.
• Lassen Sie die F- Spalte leer, da der VBA-Code die Status automatisch ausfüllt.

• Speichern Sie die Excel-Tabelle als makrofähige Datei.
• Drücken Sie nun Alt+F11 , um den VBA-Code-Editor aufzurufen.
• Klicken Sie im oberen Menü auf Extras und wählen Sie dann Referenzen aus .
• Suchen Sie in der folgenden Liste nach der Microsoft Office 16.0-Objektbibliothek und aktivieren Sie das Kontrollkästchen.
• Klicken Sie auf „OK“ , um Outlook als Objekt für VBA zu speichern.

• Klicken Sie nun auf „Einfügen“ und wählen Sie dann „Modul“ , um einen Code-Editor zu öffnen.
• Kopieren Sie den unten genannten Code und fügen Sie ihn in das Modul ein .

Sub Send_Bulk_Mails() Dim sh As Worksheet Set sh = ThisWorkbook.Sheets("Worksheet_Name") Dim i As Integer Dim OA As Object Dim msg As Object Set OA = CreateObject("outlook.application") Dim last_row As Integer last_row = Application. CountA(sh.Range("A:A")) For i = 2 To last_row Set 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 <> "" Then msg.attachments.Add sh.Range("E" & i).Value End If msg.send sh.Range("F" & i).Value = "Sent" Next i MsgBox „Alle E-Mails wurden gesendet“ End Sub

• Geben Sie den aktuellen Namen des Arbeitsblatts getrennt durch Unterstriche in Codezeile 3 ein, wo es heißt („ Arbeitsblattname “).
• Klicken Sie im Menü auf Speichern , um das Skript zu speichern.
• Sie können F5 drücken , um das Makro auszuführen, und Excel sendet die E-Mails automatisch über Outlook.

• Sie können dieses Makro auch später über die Registerkarte „Entwickler“ im Excel-Menüband aufrufen .

Abschluss

Nachdem Sie nun das Tutorial zum Versenden von Massen-E-Mails aus Outlook mit Excel VBA befolgt haben, können Sie ganz einfach Massen-E-Mails versenden, ohne Zeit mit dem manuellen Versenden von E-Mails zu verschwenden.

Möchten Sie einen weiteren VBA-Trick für Excel lernen? In diesem Tutorial erfahren Sie, wie Sie die Rechtschreibprüfung in Excel mithilfe von VBA automatisieren.