Tipp: Andere Sprachen sind Google-Übersetzungen. Sie können die English Version dieses Links.
Einloggen
x
or
x
x
Registrieren
x

or

Wie sende ich E-Mails mit mehreren Anhängen in Excel?

In diesem Artikel wird darüber gesprochen, eine E-Mail über Outlook mit mehreren Anhängen in Excel zu senden.

Senden Sie E-Mails mit mehreren Anhängen in Excel mit VBA-Code

Senden Sie schnell E-Mails mit mehreren Anhängen, die in Excel mit Kutools für Excel verknüpft sind

Registerkarte "Office" Aktivieren Sie das Bearbeiten und Durchsuchen von Registerkarten in Office und vereinfachen Sie Ihre Arbeit erheblich ...
Kutools for Excel löst die meisten Ihrer Probleme und steigert Ihre Produktivität um 80%
  • Alles wiederverwenden: Fügen Sie die am häufigsten verwendeten oder komplexesten Formeln, Diagramme und andere Elemente zu Ihren Favoriten hinzu und verwenden Sie sie in Zukunft schnell wieder.
  • Mehr als 20-Textfunktionen: Extrahieren Sie die Nummer aus der Textzeichenfolge. Teile von Texten extrahieren oder entfernen; Zahlen und Währungen in englische Wörter umrechnen ...
  • Tools zusammenführen: Mehrere Arbeitsmappen und Blätter in einer; Mehrere Zellen / Zeilen / Spalten zusammenführen, ohne Daten zu verlieren; Doppelte Zeilen und Summe zusammenführen ...
  • Geteilte Werkzeuge: Aufteilen von Daten in mehrere Blätter basierend auf dem Wert; Eine Arbeitsmappe in mehrere Excel-, PDF- oder CSV-Dateien; Eine Spalte zu mehreren Spalten ...
  • Einfügen überspringen Versteckte / Gefilterte Zeilen; Zählung und Summe nach Hintergrundfarbe; Mailingliste erstellen und Senden Sie E-Mails nach dem Wert von Cell...
  • Super Filter: Erstellen Sie erweiterte Filterschemata und wenden Sie diese auf alle Blätter an. Art nach Woche, Tag, Häufigkeit und mehr; Filtern durch Fettdruck, Formeln, Kommentar ...
  • Mehr als 300 leistungsstarke Funktionen; Funktioniert mit Office 2007-2019 und 365; Unterstützt alle Sprachen; Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation.

Senden Sie E-Mails mit mehreren Anhängen in Excel mit VBA-Code


Gehen Sie folgendermaßen vor, um eine E-Mail mit mehreren Anhängen in Excel zu senden.

1. Bitte fügen Sie eine Befehlsschaltfläche ein, indem Sie auf klicken Entwickler > Einsatz > Befehlsschaltfläche (ActiveX-Steuerelement). Siehe Screenshot:

2. Nachdem Sie die Befehlsschaltfläche eingefügt haben, klicken Sie mit der rechten Maustaste darauf und wählen Sie Code anzeigen in dem Kontextmenü.

3. In der Eröffnung Microsoft Visual Basic für Applikationen Fenster, bitte klicken Tools > Referenzen wie unten Screenshot gezeigt.

4. In dem Referenzen - VBAProject Dialogfeld finden Sie und überprüfen Sie die Microsoft Outlook-Objektbibliothek Option, und klicken Sie dann auf OK klicken.

5. Ersetzen Sie dann den Originalcode im Codefenster durch den folgenden VBA-Code.

VBA-Code: Senden Sie eine E-Mail mit mehreren Anhängen in Excel

Private Sub CommandButton1_Click()
    Dim xStrFile As String
    Dim xFilePath As String
    Dim xFileDlg As FileDialog
    Dim xFileDlgItem As Variant
    Dim xOutApp As Outlook.Application
    Dim xMailOut As Outlook.MailItem
    Application.ScreenUpdating = False
    Set xOutApp = CreateObject("Outlook.Application")
    Set xMailOut = xOutApp.CreateItem(olMailItem)
    Set xFileDlg = Application.FileDialog(msoFileDialogFilePicker)
    If xFileDlg.Show = -1 Then
        With xMailOut
            .BodyFormat = olFormatRichText
            .To = "happy.xuebi@163.com"
            .Subject = "test"
            .HTMLBody = "test"
            For Each xFileDlgItem In xFileDlg.SelectedItems
                .Attachments.Add xFileDlgItem
            Next xFileDlgItem
            .Display
        End With
    End If
    Set xMailOut = Nothing
    Set xOutApp = Nothing
    Application.ScreenUpdating = True
End Sub

Text: Bitte geben Sie Ihren E-Mail-Empfänger, Betreff und Nachrichtentext an, indem Sie die Variable ändern .To = happy.xuebi@163.com, .Subjekt = "Test" und .HTMLBody = "Test" Zeilen im Code.

6. Drücken Sie die Taste Andere + Q Tasten zusammen, um die Microsoft Visual Basic für Applikationen Fenster.

7 Klicken Entwickler > Entwurfsmodus um den Design-Modus zu deaktivieren. Siehe Screenshot:

8. Klicken Sie auf die Befehlsschaltfläche, um den Code auszuführen. In dem Auftauchen Entdecken Wählen Sie in der E-Mail die Dateien aus, die Sie anhängen möchten, und klicken Sie dann auf OK Taste. Siehe Screenshot:

9. Dann wird eine E-Mail mit den angegebenen Feldern und Anhängen erstellt. Bitte klicken Sie auf Senden Schaltfläche, um es zu senden. Siehe Screenshot:

Text: Der VBA-Code funktioniert nur, wenn Sie Outlook als E-Mail-Programm verwenden.


Senden Sie schnell E-Mails mit mehreren Anhängen, die in Excel mit Kutools für Excel verknüpft sind

Dieser Abschnitt wird Ihnen das empfehlen E-Mails senden Nutzen von Kutools for Excel. Mit diesem Dienstprogramm können Sie problemlos E-Mails mit mehreren in Excel angehängten Anlagen senden. Bitte wie folgt vorgehen.

Kutools for Excel : mit mehr als 300 praktischen Excel Add-Ins, Es ist kostenlos in 60 Tagen zu versuchen.

1. Folgen Sie dem unten gezeigten Screenshot, um eine Mailingliste zu erstellen. Geben Sie die E-Mail-Adresse des Empfängers, den E-Mail-Betreff und die Pfade der Anhänge ein, die Sie in der sendenden E-Mail anhängen müssen.

2. Wählen Sie die gesamte Mailingliste aus, die Sie gerade erstellt haben (hier wähle ich den Bereich A1: E2) und klicken Sie dann auf Unternehmen > E-Mails senden. Siehe Screenshot:

2. In dem Auftauchen E-Mails senden Dialogfeld, führen Sie bitte folgende Konfigurationen aus:

A. Die To, Dateien anhängen und Betreff Felder werden automatisch mit den ausgewählten Mailinglisten gefüllt;

B. Verfassen Sie den E-Mail-Text nach Bedarf;

C. Überprüfen Sie die Senden Sie E-Mails über Outlook Box;

D. Klicken Sie auf Senden Schaltfläche, um die E-Mail zu senden. Siehe Screenshot:

3. Dann ein Kutools for Excel Das Dialogfeld öffnet sich, um Ihnen mitzuteilen, wie viele E-Mails gesendet wurden. Bitte klicken Sie auf OK klicken Sie und schließen Sie die E-Mails senden Dialogbox. Siehe Screenshot:

Text: Sie können zum Outlook-Ordner Gesendete Objekte gehen, um nach den sendenden E-Mails zu suchen.

Tip.Wenn Sie dieses Programm kostenlos testen möchten, gehen Sie bitte zu Laden Sie die Software kostenlos herunter zuerst, und gehen Sie dann, um die Operation gemäß den obigen Schritten anzuwenden.


In Verbindung stehende Artikel:


Kutools for Excel löst die meisten Ihrer Probleme und steigert Ihre Produktivität um 80%

  • Wiederverwendung: Schnell einlegen komplexe Formeln, Diagramme und alles, was du vorher benutzt hast; Zellen verschlüsseln mit Passwort; Mailingliste erstellen und E-Mails senden ...
  • Super Formula Bar (Bearbeiten Sie mühelos mehrere Textzeilen und Formeln); Layout lesen (Leichtes Lesen und Bearbeiten einer großen Anzahl von Zellen); In gefilterten Bereich einfügen...
  • Zellen / Zeilen / Spalten zusammenführen ohne Daten zu verlieren; Inhalt der Zellen teilen; Kombinieren Sie doppelte Zeilen / Spalten... Doppelte Zellen verhindern; Bereiche vergleichen...
  • Wählen Sie "Duplizieren" oder "Eindeutig" Reihen; Wählen Sie Leere Zeilen (alle Zellen sind leer); Super Find und Fuzzy Find in vielen Arbeitsmappen; Zufallsauswahl ...
  • Exakte Kopie Mehrere Zellen ohne Änderung der Formelreferenz; Referenzen automatisch erstellen auf mehrere Blätter; Bullets einfügen, Kontrollkästchen und mehr ...
  • Extract Text, Text hinzufügen, Nach Position entfernen, Leerzeichen entfernen; Erstellen und Drucken von Paging-Zwischensummen; Zwischen Zelleninhalt und Kommentaren konvertieren...
  • Superfilter (Speichere und wende Filterschemata auf andere Blätter an); Erweiterte Sortierung nach Monat / Woche / Tag, Häufigkeit und mehr; Spezialfilter fett, kursiv ...
  • Arbeitsmappen und Arbeitsblätter kombinieren; Zusammenführen von Tabellen basierend auf Schlüsselspalten; Daten in mehrere Blätter aufteilen; Stapelkonvertierung von xls, xlsx und PDF...
  • Mehr als 300 leistungsstarke Funktionen. Unterstützt Office / Excel 2007-2019 und 365. Unterstützt alle Sprachen. Einfache Bereitstellung in Ihrem Unternehmen oder Ihrer Organisation. Kostenlose 30-Testversion für alle Funktionen.
Registerkarte Tab 201905

Registerkarte "Office" Bringt die Benutzeroberfläche mit Registerkarten in Office und vereinfacht Ihre 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 täglich Hunderte von Mausklicks für Sie!
officetab unten
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Kailas Naik · 2 months ago
    HI Team ....i am unable to see the attachment in mail so if i follow the your step...can you pls help
  • To post as a guest, your comment is unpublished.
    Regina · 10 months ago
    the above code works perfectly thanks!! but my email automatic signature seem to disappear with this code. any idea why?
  • To post as a guest, your comment is unpublished.
    Rizwan Siddiqui · 1 years ago
    What if multiple different user and different attachment to be send with different subject line.
  • To post as a guest, your comment is unpublished.
    Prashant Soni · 1 years ago
    What if above files are located in sub-folders? How to look for a file in folder and sub-folders?
  • To post as a guest, your comment is unpublished.
    Laurel Granger · 1 years ago
    I am able to "Quickly send email with multiple attachments attached in Excel with Kutools for Excel" using your steps above, but would like to take it one step further and personalize each email by inserting their names (from a column in the Excel sheet) into the body of the email. While in the body of the email, I try selecting the field and clicking on "Insert Placeholder" but nothing happens. Any idea why or how I can fix this? Thank you!