Wenn Benutzer E-Mails an ihre Kunden oder Chefs schicken, ist es ziemlich schwierig, den Überblick zu behalten. In diesem Fall kommt Excel ins Spiel. Deshalb ist die Funktion "Automatische E-Mail senden von Excel zu Ausblick" hat sich als zeitsparender Ansatz erwiesen. Excel-VBA-Makros und die HYPERLINK Funktion können Sie automatische E-Mails versenden oder einen Entwurf mit Excel-Einträgen erstellen.

Nehmen wir an, wir haben Mitarbeiter Umstrukturiertes Gehalt Daten in Excel und wir wollen eine automatische E-Mail mit Ausblick .

In diesem Artikel demonstrieren wir mehrere Varianten von VBA-Makros und die HYPERLINK Funktion zum automatischen Versenden von E-Mails von Excel zu Ausblick .

Excel-Arbeitsmappe herunterladen

⧭ Öffnen von Microsoft Visual Basic und Einfügen von Code in Module

Bevor wir mit der Demonstration von Methoden fortfahren, müssen wir wissen, wie man eine Datei öffnet und einfügt Modul im Microsoft Visual Basic in Excel.

🔄 Öffnen von Microsoft Visual Basic: Es sind hauptsächlich 3 Möglichkeiten zum Öffnen Microsoft Visual Basic Fenster.

1. die Verwendung von Tastaturkürzeln: Presse ALT+F11 insgesamt zu öffnen Microsoft Visual Basic Fenster.

2. Registerkarte "Entwickler" verwenden: Gehen Sie in einem Excel-Arbeitsblatt auf Registerkarte "Entwickler > Auswählen Visual Basic . die Microsoft Visual Basic Fenster erscheint.

3. über die Registerkarte Arbeitsblatt: Gehen Sie zu einem beliebigen Arbeitsblatt, Rechtsklick on it> Wählen Sie Code anzeigen (aus dem Kontext Menü ).

🔄 Einfügen eines Moduls in Microsoft Visual Basic: Es gibt 2 Möglichkeiten zum Einfügen einer Modul in Microsoft Visual Basic Fenster,

1. Die Optionen von Sheet verwenden: Nach dem Öffnen des Microsoft Visual Basic Fenster, wählen Sie eine Arbeitsblatt > Rechtsklick on it> Wählen Sie einfügen. (aus dem Kontextmenü )> dann wählen Sie Modul .

2. Symbolleiste verwenden: Sie können dies auch tun, indem Sie einfügen. (aus dem Symbolleiste )> dann wählen Sie Modul .

4 einfache Möglichkeiten, automatische E-Mails von Excel an Outlook zu senden

Methode 1: Verwenden von VBA-Makros zum automatischen Senden von E-Mails mit Outlook an ausgewählte Empfänger

Wir wollen eine Makro-Ausführung erstellen Schaltfläche mit dem wir einfach mit einem Klick Mails an ausgewählte Empfänger senden können.

Schritt 1: Gehen Sie zum einfügen. tab> Formen > Wählen Sie eine der angebotenen Formen (z.B., Rechteckig: Abgerundete Ecken ).

Schritt 2: Ziehen Sie die Plus-Symbol an der Stelle, an der Sie die Form wie in der nachstehenden Abbildung gezeigt.

Schritt 3: Wählen Sie eine bevorzugte Form Füllung und Gliederung Farbe Klicken Sie dann mit der rechten Maustaste darauf. Text bearbeiten um Text einzufügen.

Schritt 4: Verwenden Sie die Anleitung zu öffnen Microsoft Visual Basic und einfügen Modul Fügen Sie das folgende Makro in das Feld Modul .

 Sub ExcelToOutlookSR() Dim mApp As Object Dim mMail As Object Dim SendToMail As String Dim MailSubject As String Dim mMailBody As String For Each r In Selection SendToMail = Range("C" & r.Row) MailSubject = Range("F" & r.Row) mMailBody = Range("G" & r.Row) Set mApp = CreateObject("Outlook.Application") Set mMail = mApp.CreateItem(0) With mMail .To = SendToMail .Subject = MailSubject.Body = mMailBody .Display ' Sie können .Send verwenden End With Next r End Sub 

➤ im Code,

1 - beginnen Sie die Makroprozedur mit der Deklaration der Variablen als Objekt und Zeichenfolge .

2 - einen VBA FÜR Schleife für jede Zeile in der Auswahl, um die Emails zuzuordnen Senden an , Thema und Körper über Zeileneinträge.

3 - Variablen zuweisen.

4 - die VBA mit Anweisung zum Auffüllen Ausblick Gegenstände wie Senden an , Mail Betreff usw. Hier führt das Makro nur die Anzeige Befehl zum Herausbringen Ausblick mit einem E-Mail-Entwurf. Wenn jedoch Senden Sie wird anstelle oder nach dem Befehl Anzeige, Ausblick wird die erstellte E-Mail an die ausgewählten Empfänger gesendet.

5 - beenden Sie die VBA FÜR Schleife.

Schritt 5: Kehren Sie zum Arbeitsblatt zurück und klicken Sie mit der rechten Maustaste auf das Feld Form wählen Sie dann Makro zuweisen von der Kontextmenü Optionen.

Schritt 6: Wählen Sie das Makro (d.h., ExcelToOutlookSR ) unter dem Makro-Name und wählen Sie die Makro in Option als Dieses Arbeitsbuch . anklicken OK .

Schritt 7: Wählen Sie nun im Arbeitsblatt einen oder mehrere Mitarbeiter aus und klicken Sie auf die Schaltfläche Schaltfläche "Form .

Schritt 8: Excel-Eingabeaufforderungen Ausblick zum Mittagessen und erstellt oder sendet E-Mails an die ausgewählten Mitarbeiter. Wenn Sie zwei Mitarbeiter auswählen, Ausblick erzeugt zwei verschiedene E-Mail-Entwürfe, die zum Versenden bereit sind.

Da das Makro nur die Anzeige Befehl, Ausblick zeigt den E-Mail-Entwurf nur an, ohne ihn zu senden. Verwenden Sie die Senden Sie Befehl, um automatisch E-Mails zu versenden von Excel zu Ausblick mit Zelleneinträgen.

Lesen Sie mehr: Excel-Makro zum automatischen Senden von E-Mails (3 geeignete Beispiele)

Methode 2: Automatischer E-Mail-Versand von Excel an Outlook in Abhängigkeit von einem bestimmten Zellenwert

Was, wenn wir eine automatische E-Mail nach Erreichen von Zielen aus Excel zu Ausblick Ein Makrocode kann diese Aufgabe mit Leichtigkeit erledigen.

Angenommen, wir haben Vierteljährliche Verkaufsdaten wie unten dargestellt, nach Erreichen eines Ziels (d. h., Verkäufe> 2000 ) wird automatisch aufgefordert Ausblick um eine E-Mail aus Excel an eine zugewiesene E-Mail-ID zu senden.

Schritt 1: Geben Sie den folgenden Makrocode in eine beliebige Modul .

 Option Explicit Dim Rng As Range Sub Worksheet_Change(ByVal mRng As Range) On Error Resume Next If mRng.Cells.Count> 1 Then Exit Sub Set Rng = Intersect(Range("F17"), mRng) If Rng Is Nothing Then Exit Sub If IsNumeric(mRng.Value) And Target.Value> 2000 Then Call ExcelToOutlook End If End Sub Sub ExcelToOutlook() Dim mApp As Object Dim mMail As Object Dim mMailBody As String Set mApp =CreateObject("Outlook.Application") Set mMail = mApp.CreateItem(0) mMailBody = "Greetings Sir" & vbNewLine & vbNewLine & _ "Our outlet has quarterly Sales more than the target." & vbNewLine & _ "It's a confirmation mail." & vbNewLine & vbNewLine & _ "Regards" & vbNewLine & _ "Outlet Team" On Error Resume Next With mMail .To = "[email protected]" .CC = "".BCC = "" .Subject = "Benachrichtigung über Erreichen des Umsatzziels" .Body = mMailBody .Display 'oder Sie können .Send End With On Error GoTo 0 Set mMail = Nothing Set mApp = Nothing End Sub 

➤ Aus dem obigen Bild, in den Abschnitten,

1 - eine Zelle zuweisen (d. h., F17 ) innerhalb eines Bereichs, um die VBA-WENN Wenn die Anweisung zu einem Wahr ruft das Makro ein anderes Makro zur Ausführung auf.

2 - Variablentypen zu deklarieren und zuzuweisen, um sie zu füllen Ausblick Einträge.

3 - durchführen VBA mit Anweisung, um den E-Mail-Einträgen Variablen zuzuweisen. Verwenden Sie die Senden Sie Befehl anstelle von Anzeige für den Fall, dass Sie E-Mails direkt versenden möchten, ohne sie zu überprüfen. Die Empfänger-E-Mail wird in das Makro eingefügt. Verwenden Sie alternative Methoden, wenn Sie eine automatische Einfügung der Empfänger-E-Mail-ID wünschen.

4 - bestimmte Variablen von der Zuweisung befreien.

Schritt 2: Verwenden Sie die F5 Taste, um das Makro auszuführen. In einem Moment holt Excel Ausblick mit einem automatisch erstellten E-Mail-Entwurf, wie im Folgenden gezeigt. Sie können auf Senden Sie oder Auto-Senden mit Senden Sie Befehl in dem Makro.

Lesen Sie mehr: Automatisches Senden von E-Mails aus Excel auf der Grundlage von Zellinhalten (2 Methoden)

Ähnliche Lektüre

• Wie man sieht, wer in einer freigegebenen Excel-Datei ist (mit schnellen Schritten)
• Arbeitsmappe freigeben in Excel aktivieren
• Freigeben von Excel-Dateien für mehrere Benutzer
• Makro zum Senden von E-Mails aus Excel mit Anhang anwenden

Methode 3: Verwenden von VBA-Makro zum Senden von E-Mails mit aktivem Arbeitsblatt von Excel durch Outlook

Es kann aber auch vorkommen, dass wir eine ganze Aktives Blatt an eine zugewiesene E-Mail-Adresse. In diesem Fall können wir eine Benutzerdefinierte VBA-Funktion die innerhalb eines Makros aufgerufen werden sollen.

Schritt 1: Fügen Sie das folgende Makro in die Datei Modul .

 Function ExcelOutlook(mTo, mSub As String, Optional mCC As String, Optional mBd As String) As Boolean On Error Resume Next Dim mApp As Object Dim rItem As Object Set mApp = CreateObject("Outlook.Application") Set rItem = mApp.CreateItem(0) With rItem .To = mTo .CC = "" .Subject = mSub .Body = mBd .Attachments.Add ActiveWorkbook.FullName .Display 'oder Sie können .Send verwenden End With Set rItem = NothingSet mApp = Nothing End Function Sub OutlookMail() Dim mTo As String Dim mSub As String Dim mBd As String mTo = "[email protected]" mSub = "Quarterly Sales Data" mBd = "Greetings Sir" & vbNewLine & vbNewLine & _ "Kindly find Outlet's Quarterly Sales Data attached with this mail." & vbNewLine & _ "It's a notification mail." & vbNewLine & vbNewLine & _ "Regards" &vbNewLine & _ "Outlet Team" If ExcelOutlook(mTo, mSub, , mBd) = True Then MsgBox "Erfolgreich den Mailentwurf erstellt oder gesendet" End If End Sub 

➤ In der obigen Abbildung sind die Abschnitte des Codes dargestellt,

1 - deklarieren und setzen Sie die Variablen.

2 - weisen Sie die Befehle mit Hilfe der VBA mit Anweisung. Verwenden Sie die Anzeige oder Senden Sie zum Überprüfen bzw. direkten Versenden von E-Mails.

3 - die zuvor gesetzten Variablen löschen.

4 - die VBA mit Befehle mit Texten.

5 - ausführen Benutzerdefinierte VBA-Funktion .

Schritt 2: Um das Makro auszuführen, drücken Sie F5 und sofort zeigt Excel die Ausblick mit einem E-Mail-Entwurf zur Überprüfung, der dem untenstehenden Bild ähnelt. Danach können Sie die E-Mail versenden.

Lesen Sie mehr: Senden von Massen-E-Mails aus Outlook mit Excel (3 Wege)

Methode 4: Automatischer E-Mail-Versand von Excel an Outlook mit der HYPERLINK-Funktion

Die HYPERLINK Funktion erzeugt einen anklickbaren Link in Excel-Zellen, um die Ausblick als Medium zum Versenden von automatischen E-Mails aus Excel.

Schritt 1: Geben Sie die folgende Formel in die Zelle H5 .

Die HYPERLINK Funktion nimmt "MailTo:"&C5&"?Subject="&F5&"&cc="&$D$2&"&body="G 5 als link_location und "Hier klicken" als freundlicher_name .

Schritt 2: Hit EINGEBEN um den Link einzufügen. Klicken Sie dann auf den Link.

Schritt 3: Excel führt Sie zu Ausblick Und Sie sehen all die Ausblick werden die Einträge mit den zugewiesenen Daten aus Excel gefüllt. Klicken Sie auf Senden Sie .

Schritt 4: Ziehen Sie die Füllen Griff um die Formel auf andere Zellen anzuwenden.

Lesen Sie mehr: Automatisches Versenden von E-Mails bei erfüllter Bedingung in Excel

Schlussfolgerung

VBA-Makro-Varianten und HYPERLINK Funktion kann beim Senden von automatischen E-Mails von Excel an Outlook hilfreich sein. Ich hoffe, Sie finden Ihre bevorzugte Methode unter den oben beschriebenen. Kommentieren Sie, wenn Sie weitere Fragen haben oder etwas hinzufügen möchten.