Wie sende ich personalisierte Massen-E-Mails aus Excel über Outlook an eine Liste?
Ich habe beispielsweise den folgenden Datenbereich in einem Arbeitsblatt, das die Spalten Name, E-Mail-Adresse, Registrierungscode enthält, und möchte jetzt eine Nachricht mit einer personalisierten Begrüßung und einem eigenen Registrierungscode an die getrennten E-Mail-Adressen in Spalte A senden. Um dieses Problem zu lösen, können die folgenden Methoden hilfreich sein.
Senden Sie personalisierte Massen-E-Mails mit der Seriendruckfunktion aus Excel an eine Liste
Senden Sie personalisierte Massen-E-Mails mit VBA-Code an eine Liste aus Excel
Senden Sie mithilfe von Kutools for Excel personalisierte Massen-E-Mails an eine Liste mit verschiedenen Anhängen
Senden Sie personalisierte Massen-E-Mails mit der Seriendruckfunktion aus Excel an eine Liste
Mit den Worten Seriendruck Funktion können Sie diesen Job schnell und einfach beenden, bitte machen Sie mit den folgenden Schritten Schritt für Schritt:
1. Starten Sie ein neues leeres Word-Dokument und klicken Sie dann auf Mailings > Wählen Sie Empfänger aus > Verwenden Sie eine vorhandene Liste, siehe Screenshot:
2. In dem Wählen Sie Datenquelle Wählen Sie im Fenster die Arbeitsmappe mit dem Datenbereich aus, den Sie verwenden möchten, und klicken Sie auf Offen Schaltfläche, siehe Screenshot:
3. Im Kommen Wählen Sie Tabelle Wählen Sie im Dialogfeld das Arbeitsblatt mit dem gewünschten Datenbereich aus und klicken Sie dann auf OK Schaltfläche, siehe Screenshot:
4. Das Hauptdokument der E-Mail-Nachricht und Ihre Adressliste wurden miteinander verbunden. Jetzt können Sie die Textnachricht bearbeiten und Platzhalter hinzufügen, die angeben, wo die eindeutigen Informationen in jeder Nachricht angezeigt werden.
(1.) Um den individuellen Begrüßungsnamen einzufügen, klicken Sie auf Mailings > Fügen Sie das Zusammenführungsfeld ein > Name und Vornamewurde der personalisierte Name in die Nachricht eingefügt und der Feldname ist von umgeben «».
(2.) Geben Sie Ihre Nachricht weiter ein und fügen Sie die ein Registrierungscode an der Stelle, an der Sie brauchen, siehe Screenshot:
5. Nach dem Verfassen der Nachricht können Sie auf klicken Vorschau Ergebnisse unter dem Postsendung Registerkarte, um eine Vorschau der E-Mail-Nachrichten anzuzeigen und Änderungen vorzunehmen, bevor Sie die Zusammenführung tatsächlich abschließen.
6. Nachdem Sie sichergestellt haben, dass es kein Problem gibt, können Sie die E-Mails an die einzelnen Empfänger senden. Klicken Sie auf Mailings > Beenden & Zusammenführen > E-Mail-Nachricht senden, siehe Screenshot:
7. Dann tauchte der auf Zusammenführen zu E-Mail Führen Sie im Dialogfeld die folgenden Vorgänge aus:
(1.) Aus dem Zu Dropdown-Liste, bitte wählen E-Mail-Addresse Säule;
(2.) Sie können das Thema in das Feld eingeben Betreff Zeilentextfeld;
(3.) Aus dem Datensätze senden Abschnitt auswählen Alle.
8. Und dann klick OKWenn die E-Mails sofort mit ihrem eigenen Registrierungscode an separate Empfänger gesendet werden, können Sie nach dem Senden der E-Mails in Outlook sicherstellen, dass die E-Mails erfolgreich gesendet wurden.
Senden Sie personalisierte E-Mails an mehrere Empfänger mit unterschiedlichen Anhängen:
Mit der Kutools for Excel's E-Mails senden Mit dieser Funktion können Sie bei Bedarf schnell personalisierte E-Mails mit verschiedenen Anhängen aus Excel über Outlook an mehrere Empfänger senden. Gleichzeitig können Sie die Nachrichten auch an eine bestimmte Person senden oder bcc. Kutools für Excel jetzt herunterladen und kostenlos testen! |
Senden Sie personalisierte Massen-E-Mails mit VBA-Code an eine Liste aus Excel
Mit Ausnahme der Seriendruckfunktion kann Ihnen der folgende VBA-Code ebenfalls einen Gefallen tun. Bitte tun Sie Folgendes:
1. Halten Sie die Taste gedrückt ALT + F11 Tasten, und es öffnet die Microsoft Visual Basic für Applikationen Fenster.
2. Klicken Sie Insert > Modulund fügen Sie den folgenden Code in das Feld ein Modul Fenster.
VBA-Code: Senden Sie personalisierte Massen-E-Mails an eine Liste aus Excel:
#If VBA7 And Win64 Then
Private Declare PtrSafe Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
ByVal hwnd As LongPtr, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As LongPtr
#Else
Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" ( _
ByVal hwnd As Long, ByVal lpOperation As String, _
ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, _
ByVal nShowCmd As Long) As Long
#End If
Sub SendEMail()
'update by Extendoffice 20160506
Dim xEmail As String
Dim xSubj As String
Dim xMsg As String
Dim xURL As String
Dim i As Integer
Dim k As Double
Dim xCell As Range
Dim xRg As Range
Dim xTxt As String
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the data range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
If xRg.Columns.Count <> 3 Then
MsgBox " Regional format error, please check", , "Kutools for Excel"
Exit Sub
End If
For i = 1 To xRg.Rows.Count
' Get the email address
xEmail = xRg.Cells(i, 2)
' Message subject
xSubj = "Your Registration Code"
' Compose the message
xMsg = ""
xMsg = xMsg & "Dear " & xRg.Cells(i, 1) & "," & vbCrLf & vbCrLf
xMsg = xMsg & " This is your Registration Code "
xMsg = xMsg & xRg.Cells(i, 3).Text & "." & vbCrLf & vbCrLf
xMsg = xMsg & " please try it, and glad to get your feedback! " & vbCrLf
xMsg = xMsg & "Skyyang"
' Replace spaces with %20 (hex)
xSubj = Application.WorksheetFunction.Substitute(xSubj, " ", "%20")
xMsg = Application.WorksheetFunction.Substitute(xMsg, " ", "%20")
' Replace carriage returns with %0D%0A (hex)
xMsg = Application.WorksheetFunction.Substitute(xMsg, vbCrLf, "%0D%0A")
' Create the URL
xURL = "mailto:" & xEmail & "?subject=" & xSubj & "&body=" & xMsg
' Execute the URL (start the email client)
ShellExecute 0&, vbNullString, xURL, vbNullString, vbNullString, vbNormalFocus
' Wait two seconds before sending keystrokes
Application.Wait (Now + TimeValue("0:00:02"))
Application.SendKeys "%s"
Next
End Sub
3. Dann drücken F5 Wenn Sie die Taste drücken, um diesen Code auszuführen, wird ein Eingabeaufforderungsfeld angezeigt, das Sie daran erinnert, den Datenbereich auszuwählen, den Sie verwenden möchten. Siehe Screenshot:
4. Und dann klick OK Wenn Sie auf die Schaltfläche klicken, werden die E-Mails nacheinander an separate Adressen mit ihrem individuellen Registrierungscode gesendet. Nach dem Senden der E-Mails können Sie in Outlook sicherstellen, dass die E-Mails erfolgreich gesendet wurden.
Note: Im obigen Code können Sie den Betreff oder die Textnachricht nach Ihren Wünschen ändern.
Senden Sie mithilfe von Kutools for Excel personalisierte Massen-E-Mails an eine Liste mit verschiedenen Anhängen
Wenn Sie Kutools for ExcelMit seinen E-Mails senden Mit dieser Funktion können Sie bei Bedarf schnell personalisierte E-Mails an mehrere Empfänger mit unterschiedlichen Anhängen senden.
Kutools for Excel : Mit mehr als 300 praktischen Excel-Add-Ins können Sie diese innerhalb von 30 Tagen ohne Einschränkung testen. |
Nach der Installation Kutools for ExcelBitte machen Sie Folgendes:
1. Klicken Sie Kutoolen Plus > E-Mails senden, siehe Screenshot:
2. In dem Senden Sie Emials Wählen Sie im Dialogfeld den Datenbereich aus, den Sie verwenden möchten, und geben Sie dann die Empfängeradressen, Anhänge und den Betreff nach Bedarf an (siehe Abbildung):
3. Geben Sie im Bearbeitungsfeld die einzelnen Begrüßungsnamen ein, wählen Sie bitte Name und Vorname Klicken Sie in der Dropdown-Liste auf und klicken Sie dann auf Platzhalter einfügen Informationen zum Einfügen der Namen in die Nachricht finden Sie im Screenshot:
4. Geben Sie dann Ihren Nachrichtentext nach Bedarf in das Feld ein, siehe Screenshot:
5. Wählen Sie nach Abschluss des E-Mail-Textes den gewünschten Sendemodus aus. Sie können ihn über Outlook oder Ihren angegebenen Server senden. Siehe Abbildung:
Note: Wenn Sie einen anderen Server verwenden möchten, klicken Sie auf Ausgehende Servereinstellungen Informationen zum Einstellen des Sendemodus finden Sie unter screesnhot:
6. Endlich, klick Absenden Klicken Sie auf die Schaltfläche zum Senden der E-Mails. Nach Abschluss wird ein Eingabeaufforderungsfeld angezeigt, das Sie an den Sendestatus erinnert. siehe screesnhot:
Klicken Sie auf Download und kostenlose Testversion von Kutools for Excel Now!
Demo: Senden Sie personalisierte Massen-E-Mails über Outlook an eine Liste aus Excel
In Verbindung stehender Artikel:
Wie sende ich E-Mails aus Excel über Outlook an mehrere Empfänger in einer Liste?
Beste Office-Produktivitätstools
Verbessern Sie Ihre Excel-Kenntnisse mit Kutools für Excel und erleben Sie Effizienz wie nie zuvor. Kutools für Excel bietet über 300 erweiterte Funktionen, um die Produktivität zu steigern und Zeit zu sparen. Klicken Sie hier, um die Funktion zu erhalten, die Sie am meisten benötigen ...
Office Tab Bringt die Oberfläche mit Registerkarten in Office und erleichtert Ihnen die Arbeit erheblich
- Aktivieren Sie das Bearbeiten und Lesen von Registerkarten in Word, Excel und PowerPoint, Publisher, Access, Visio und Project.
- Öffnen und erstellen Sie mehrere Dokumente in neuen Registerkarten desselben Fensters und nicht in neuen Fenstern.
- Steigert Ihre Produktivität um 50 % und reduziert jeden Tag Hunderte von Mausklicks für Sie!