Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
712to716
712to716
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

pdf Datei als e-mail Anhang via Excel VBA senden

Forumthread: pdf Datei als e-mail Anhang via Excel VBA senden

pdf Datei als e-mail Anhang via Excel VBA senden
22.12.2005 14:53:33
Sebastian
Hallo,
ich möchte mittels VBA aus Excel heraus eine pdf Datei versenden. Der
e-Mail client ist outlook.
Kann mir einer einen Tip geben, wie dies funktionieren kann?
Habe ein Button, der das Makro anstossen soll.
Besten Dank
Sebastian
Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: pdf Datei als e-mail Anhang via Excel VBA senden
22.12.2005 15:52:53
MichaV
Hallo,
http://www.online-excel.de/excel/singsel_vba.php?f=86
Du musst eine Zeile anpassen, das sollte kein Problem sein.
Gruß- Micha
PS: Rückmeldung wäre nett.
Anzeige
;

Forumthreads zu verwandten Themen

E-Mailversand mit Anhang
Timo

Hallo ich benutze folgenden Code um mir wenn in Spalte C ein Ja steht, eine Mail an die Mailadresse aus Spalte A zu senden! Ich hab alles in einer Userform! Wo sich auch die Listbox1 befindet wo ich den oder die Dateipfad(e) für den Anhang stehen habe!
Wenn ich meine Schleife jetzt durchlau...
11.11.2008 15:07:00
Thread-ID: 1023575
2 Beiträge
excel-datei per email versenden
meixner

Hallo zusammen,
Habe ein Makro, dass eine Excel - Datei nach Aufmachen aktualisiert und dann per Email versendet, wenn ich dies anklicke.
Möchte, dass um eine bestimmte Uhrzeit z.B. 17.00 Uhr die Datei automatisch sich aktualisiert und versendet wird.
Habt ihr eine Idee?
wsZiel....
25.03.2009 18:13:18
Thread-ID: 1063913
2 Beiträge
e-Mail-Versand mit PDF-Anhang
kutzmutz

Hallo nochmal,
ich hab noch ein Problem mit dem eMail-Versand.
Ich generiere mir eine Liste. Diese will ich als PDF-Anhang in einer e-Mail verschicken. Der Macro-Rekoder hat mir dazu folgendes geliefert:
ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _
"C:\Users\...
06.06.2009 16:06:45
Thread-ID: 1079612
2 Beiträge
Tabellenblatt per Mail versenden
Sandra

Hallo zusammen,
vor lauter Bäumen habe ich nix im Archiv gefunden (irgendetwas passte nie). Vielleicht hat ja jemand von Euch ein derartiges Makro schon einmal gemacht.
Ich möchte aus einer Datei ein Makro starten, was folgendes macht:
Ein Tabellenblatt dieser geöffneten Datei soll...
12.06.2009 15:45:33
Thread-ID: 1081014
4 Beiträge
Serien-Mail mit Anhang
Boulbadaoui

Hallo,
ich versuche mit dem folgenden Makros, einen Serienmail zu gestalten, leider bekomme ich immer die Zeitlauffehlermeldung 7225!
_____________________________________________________________
Sub testmail() Dim i, empfänger, anlagen, titel, mailtext, An As Variant Dim Entwurf...
26.06.2009 14:47:56
Thread-ID: 1084609
2 Beiträge
Anzeige
Serien-Mail mit Anhang
Boulbadaoui

Hallo,
ich versuche mit dem folgenden Makros, einen Serienmail zu gestalten, leider bekomme ich immer die Zeitlauffehlermeldung 7225!
_____________________________________________________________
Sub testmail() Dim i, empfänger, anlagen, titel, mailtext, An As Variant Dim Entwurf...
26.06.2009 14:32:33
Thread-ID: 1084612
7 Beiträge
Email als Einfügen und Anhang senden
Volker

Hallo liebe Excel- Gemeinde,
habe da mal wieder ein Problem mit Excel und dem versenden von einer Exceldatei.
Den Code habe ich aus dem Forum, ein wenig abgeändert. Leider ist das Ergebnis nicht "vollkommen" wie ich es haben wollte
https://www.herber.de/bbs/user/65540.xls
Ich b...
03.11.2009 07:22:25
Thread-ID: 1113911
6 Beiträge
Arbeitsmappe per Mail versenden
massimo17

Hallo,
ich möchte eine Arbeitsmappe per Mail versenden.
Folgendes Vorgehen ist geplant:
1. Der User erhält einen Fragebogen in EXCEL-Format zum ausfüllen
2. Nach erfolgreichem ausfüllen, soll er auf einen Knopf drücken der die ausgefüllte Mappe versendet
Bei mir tritt das P...
10.11.2009 16:52:09
Thread-ID: 1115943
4 Beiträge
Email mit Anhang, falls Anhang verfügbar
Thomas

Hallo zusammen,
ich hänge gerade wieder an einer Stelle.
Ich habe ein Makro, welches vollautomatisch täglich Emails aus Excel mit 2 pdf-Dateien im Anhang versendet. Es werden ca. 50 Emails verschickt. Jede Mail an unterschiedliche Empfänger und mit unterschieldlichen pdf - Anhängen. Die...
02.12.2009 08:53:16
Thread-ID: 1121328
3 Beiträge
Email mit Anhang versenden ueber outlook
abu

Hallo Zusammen,
habe folgenden Code gefunden und wuerde den gerne fuer meine Beduerfnisse umstricken. Leider bekomme ich immer eine Fehlermeldung bei dieser Zeile:
.SaveAs TempFilePath & TempFileName & FileExtStr, FileFormat:=FileFormatNum
Wuerde mich ueber hilfe sehr freuen...
16.12.2009 13:28:45
Thread-ID: 1122907
2 Beiträge
Anzeige
Lotus-Notes-Mail mit Anhang aus Excel
Wilfried

Hallo und guten Tag,
folgendes Makro habe ich im Forum gefunden. Es bleibt immer an der Zeile
(Set MailDoc = Maildb.CREATEDOCUMENT) stehen, warum? ... und was muss ich tun, damit der Code mit abgespeichert wird?
Sub SendNotesMail() Dim Maildb As Object Dim MailDbName As String Dim M...
13.01.2010 14:25:25
Thread-ID: 1129487
2 Beiträge
Tabelle per Mail versenden
liese

Hallo,
habe folgendes Anliegen.
Ich möchte gerne, wenn eine Mappe geöffnet wird,
eine bestimmte Tabelle im Hintergrund mit dem
Standardmailprogramm ohne Rückfragen versenden.
Wie geht das.
Danke schon mal für Hilfe.
Viele Grüsse
Anneliese
01.01.1970 00:00:00
Thread-ID: 1139930
37 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

PDF-Datei als E-Mail-Anhang via Excel VBA senden

Schritt-für-Schritt-Anleitung

Um eine PDF-Datei direkt aus Excel heraus per E-Mail zu versenden, kannst Du folgendes VBA-Makro verwenden. Stelle sicher, dass Du Microsoft Outlook installiert hast, da es als E-Mail-Client fungiert.

  1. Öffne Excel und drücke ALT + F11, um den VBA-Editor zu öffnen.

  2. Füge ein neues Modul hinzu: Rechtsklick auf einen Eintrag im Projektfenster > Einfügen > Modul.

  3. Kopiere den folgenden Code in das Modul:

    Sub SendPDFByEmail()
   Dim OutApp As Object
   Dim OutMail As Object
   Dim pdfPath As String

   ' PDF-Datei speichern
   pdfPath = ThisWorkbook.Path & "\DeineDatei.pdf"
   ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfPath

   ' Outlook-Objekt erstellen
   Set OutApp = CreateObject("Outlook.Application")
   Set OutMail = OutApp.CreateItem(0)

   ' E-Mail konfigurieren
   With OutMail
       .To = "empfaenger@example.com"
       .Subject = "Hier ist die PDF-Datei"
       .Body = "Bitte finde die angehängte PDF-Datei."
       .Attachments.Add pdfPath
       .Display ' oder .Send, um die E-Mail direkt zu senden
   End With

   ' Objekte freigeben
   Set OutMail = Nothing
   Set OutApp = Nothing
End Sub

  4. Ändere die E-Mail-Adresse und den Dateinamen nach Bedarf.

  5. Füge einen Button in Dein Excel-Blatt ein und verlinke ihn mit dem Makro SendPDFByEmail.

Häufige Fehler und Lösungen

  • Fehler: "Outlook konnte nicht gestartet werden."

    • Stelle sicher, dass Microsoft Outlook korrekt installiert und konfiguriert ist.

  • Fehler: "Die Datei kann nicht gespeichert werden."

    • Überprüfe den Pfad, in dem Du die PDF-Datei speichern möchtest. Stelle sicher, dass Du die Berechtigung hast, dort zu speichern.

  • E-Mail wird nicht gesendet.

    • Überprüfe Deine Internetverbindung und die Outlook-Einstellungen. Möglicherweise gibt es Sicherheitsbeschränkungen.

Alternative Methoden

  1. Direktes Senden über Excel:

    • Du kannst auch ein Makro verwenden, das die gesamte Arbeitsmappe als PDF speichert und diese dann versendet.

  2. Verwendung von Power Automate:

    • Mit Microsoft Power Automate kannst Du automatisierte Workflows erstellen, um PDF-Dateien zu versenden, ohne VBA zu verwenden.

Praktische Beispiele

  • Beispiel 1: Senden eines bestimmten Arbeitsblatts als PDF

    Ändere den Exportbefehl im obigen Makro, um nur ein bestimmtes Blatt zu exportieren:

    ActiveSheet("DeinBlattname").ExportAsFixedFormat Type:=xlTypePDF, Filename:=pdfPath

  • Beispiel 2: Hinzufügen einer CC-Adresse

    Füge eine CC-Adresse einfach in der E-Mail-Konfiguration hinzu:

    .CC = "cc@example.com"

Tipps für Profis

  • PDF-Qualität anpassen:

    • Du kannst die Qualität der PDF-Datei anpassen, indem Du verschiedene Parameter in der ExportAsFixedFormat-Methode verwendest.

  • Fehlermeldungen abfangen:

    • Implementiere Error-Handling in Dein Makro, um unerwartete Fehler besser zu managen.

FAQ: Häufige Fragen

1. Wie sende ich eine PDF-Datei per Mail? Du kannst das oben genannte VBA-Makro verwenden, um eine PDF-Datei direkt aus Excel zu versenden.

2. Funktioniert das auch in Excel 365? Ja, dieses VBA-Makro ist mit Excel 365 sowie anderen Versionen von Excel kompatibel. Stelle sicher, dass Deine Outlook-Anwendung korrekt konfiguriert ist.

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige