ich hoffe ich überstrapaziere euch nicht .. diesmal suche ich eine Lösung die wahrscheinlich etwas aufwändiger ist.
Ich habe eine Beispieldatei hochgeladen, zu viele Komponenten um das ohne Datei zu erläutern.
https://www.herber.de/bbs/user/83259.xlsm
Kurzum: ich muss aus einer dynamischen Domainliste mit div Einträgen (jede Domain kann mehrere Einträge haben) pro Domain (also pro Kunde) ein PDF erstellen das die zu der Domain gehörigen Informationen enthält. Dieses PDF muss ich dann an eine Email hängen, aus der Liste eine Emailadresse auswählen + einen dynamischen Betreff und einen dynamisches Emailtext in die Email einfügen und dann per Outlook verschicken.
Das PDF kriege ich schon hin - es geht mir jetzt darum, das als Email verschicken zu können und zwar seriell = für jede "angekreuzte" Domain soll eine Email mit einem entsprechenden PDF Anhang verschickt werden.
Im Detail - bezogen auf die Beispieldatei:
In Tabellenblatt "Overview" werden in Spalte D per "x" die Domains "angekreuzt" für die ein PDF erstellt werden soll. Es wird immer das oberste "x" als PDF im Tabellenblatt "BA-ENG-Fax" angezeigt.
Das PDF an sich kann immer unterschiedlich lang werden nach unten, dafür habe ich schon ein Makro mit dynamischem Druckbereich, das müsste dann auch angesteuert werden(Makro: Drucken01()).
Die Routine müsste also so funktionieren:
Das PDF wird mit dem "Drucken01()" Makro erstellt mit dem Dateinamen der im Tabellenblatt "BA-ENG-Fax" in D18 steht. Das PDF soll einfach auf C:\ gespeichert werden.
Dann soll eine Email geschickt werden, mit dem eben erstellen PDF als Anhang an den Empfänger der im Tabellenblatt "Email Text" in Zelle C2 steht, dem Betreff der in "Email Text" in Zelle C3 steht und dem Email Text der dort im Bereich B6:B22 steht.
Dann soll das Marko zurückspringen auf "Overview" das oberste "x" (das irgendwo in D9:D5000 stehen kann) löschen und solange noch ein weiteres "x" (also weiter unten in D) eingetragen ist, wieder von vorn anfangen.
Ich hoffe, dass klar ist was ich meine. Wenn das zu krass ist als Hilfegesuch, dann sagt mir bitte Bescheid.
Viele Grüße,
Martin