Autom. E-Mail Generierung aus Excel
20.04.2021 11:28:30
Leuenberger
Ich bin ein VBA-Neuling und kenne mich viel zu wenig aus. Ich hoffe auf eure Hilfe.
Ich möchte mit Inhalten aus 2 unterschiedlichen Excel-Files und einer im Windows gespeicherten Datei automatisch (mittels VBA) eine E-Mail generieren und dort diese Datei als Anhang einfügen.
Datei 1: Debitoren_2021_neutral.xlsx
https://www.herber.de/bbs/user/145672.xlsx
Es geht um eine Debitorenliste, wo diverse Kunden gespeichert sind.
Speicherort: D:\Durga\Praxis\Abrechnungen\Debitoren\
In der Spalte A ist die jeweilige Rechnungsnummer gespeichert. Von dieser Rechnungsnummer gibt es eine Datei, welche in folgendem Kundenspezifischen Folder gespeichert ist (hier mit Beispiel Hans Muster).
Speicherort und Dateiname der einzufügenden Datei: D:\Durga\Praxis\Abrechnungen\2021\Muster_Hans\202103001_Muster_Hans_Rechnung.pdf
Datei 2: Adressverzeichnis_neutral.xls
https://www.herber.de/bbs/user/145673.xlsx
Hier ist die E-Mail Adresse des Kunden gespeichert (in Spalte M), an welchen die E-Mail gesendet werden soll.
Speicherort dieser Datei: D:\Durga\Praxis\Abrechnungen\Adressverzeichnis_neutral.xls
Zusätzlich wird der Inhalt dieser Datei als "Abbild" im Tabellenblatt "Adressverzeichnis" in der Debitorenliste angezeigt.
Was möchte ich nun machen?
Ich habe die Debitorenliste geöffnet. In derjenigen Zeile, in welcher eine Zelle markiert ist (z. B. aktive Zelle = E5) soll das Makro
a) den Namen des Kunden auslesen (D5)und damit den Speicherort der einzufügenden Datei "identifizieren"
b) die Rechnungsnummer (202103001) auslesen, und damit die richtige Datei aus dem oben identifizierten Speicherort aussuchen
c) eine neue E-Mail öffnen (das richtige Outlook-Konto ist bereits geöffnet) und dort die E-Mail Adresse des Kunden eintragen
d) beim Betreff "Rechnung 202103001 Hans Muster" eintragen
c) beim Text: Hallo Hans, hier erhälst du deine Rechnung" eintragen.
Ist so etwas ohne grossen Programmieraufwand möglich? Wenn ja, dann wäre ich euch super dankbar, wenn mir hier jemand weiterhelfen könnte. Ich könnte so den Rechnungsprozess massiv vereinfachen.
Vielen herzlichen Dank bereits im voraus!
Freundliche Grüsse aus der Schweiz!
Roger