Automatische Mailversendung per VBA
03.06.2021 10:59:52
Thomas
Beispieldatei: https://www.herber.de/bbs/user/146480.xlsb
Heute wende ich mich mit einer für versierte VBA - Cracks einfachen Anfrage an Euch.
Ich möchte aus einem Tabellenblatt per Makro eine Mail erzeugen, welche aber nicht abgeschickt wird, sondern bei welcher der Mitarbeiter noch aktiv auf "Senden" in MS Outlook drücken muss.
Die Datei wird IMMER so aussehen, wie in der angehängten Beispieldatei.
Spalte A: stets eine andere, jedoch immer 9-stellige Zahl
Spalte B: Mail-Adresse des Mitarbeiters, dieser kann mehrfach vorkommen
Spalte C: Teamleiter des in Spalte B genannten Mitarbeiters, kann dementsprechend auch mehrfach vorkommen
Spalte D: Team des Mitarbeiters, kann also auch mehrfach vorkommen
Spalte E bis N: Immer die gleichen Überschriften in den Zellen A5 - N7, jedoch immer andere Daten (analog zu Spalte "A") (ja, 2 leere Spalten ist richtig, in der Beispieldatei geht es nur bis N6)
Toll wäre nun, wenn man einen Button betätigen würde, welcher Folgendes bewirkt:
Es soll eine Mail an die Mailadresse aus Spalte B erzeugt werden.
In "CC" soll der zu dem jeweiligen Mitarbeiter gehörige Teamleiter aus Spalte C stehen.
Als Betreff der Mail, soll immer der Text "Erinnerung - Abgabe überfällig" stehen.
Im Text der Mail soll als Anrede der Name das Mitarbeiters OHNE die Zeichen nach dem @ stehen - wenn also die Mailadresse "Max.Mustermann@gmx.de" lautet, wäre es toll, wenn als Anrede "Hallo Max Mustermann" stünde und man danach noch einen freien Text definieren kann.
Im Text soll dann eine Kopie der Daten aus dem Tabellenblatt zu finden sein, also sprich die Daten ab Zelle A6 bis N6, welche zu diesem Mitarbeiter gehören.
Als Beispiel:
Wenn der Mitarbeiter 6x in der Tabellenspalte B auftaucht (das kann auch ganz durcheinander sein), sollen im Text der Mail auch nur genau seine Daten stehen.
Am allerliebsten und wenn es nicht zu vermessen ist, in genau der Form, wie in der Beispieldatei. Eben nur als Tabelle in den Mailtext eingefügt.
Am Ende soll diejenige Signatur des aktuellen Postfaches stehen, welche gerade die Mail sendet.
Es kann also durchaus passieren, dass durch dieses Makro 30 oder mehr Mails erzeugt werden, welche noch händisch versendet werden sollen.
Diese dürfen sich auch gern minimiert auf der Taskleiste von Windows öffnen, damit der Mitarbeiter, welche die Datei senden soll, diese auch sieht.
Geht soetwas?
Ich bekomme es leider nicht hin.
Es wäre toll, wenn es ein Quelltext ist, welchen ich nur in ein normales Modul einfügen kann, ggf. anpassen und dann immer neuen Makroknöpfen zuweisen kann.
Vielen herzlichen Dank und beste Grüße.
Thomas