Seriendruck Pläne per Mail verschicken

[Hobbit]

Moin,
jetzt klappt es mit dem Mail Versand.
Ich habe jedes Register was versendet werden soll einen Fahrer Namen gegeben.
Gibt es die Möglichkeit das, wenn ich es per Mail verschicke vorher in PDF umgewandelt wird?

Sonst habt ihr mir schon sehr geholfen.

Vielen dank dafür nochmal.

Mfg Jens

[thowe]

Hallo!

Verwendest du Dein Tool nur an einem Gerät (zB deinem Laptop)?
Oder wird die Excel Datei auf verschiedenen Geräten verwendet.

Ist immer der Standard PDF Drucker zu verwenden?
Wird nur auf Windows Rechner gearbeitet, oder auch auf Mac?

Wenn diese Punkte geklärt sind, gebe ich dir gerne eine VBAstel`Anleitung.

lg thowe

[Hobbit]

Moin,
es wird immer an einem Rechner gearbeitet.
Microsoft Print to PDF, haben wir.
Es sind Windows Rechner.

Vielen dank

MFG Jens

[thowe]

Hallo Jens,

Danke für die Antwort.

Ich sende dir morgen eine Function, die du dann in allen Projekten einsetzen kannst.

lg

[thowe]

Hallo Jens,

wie versprochen nun eine mögliche - kurze - Lösung.

Den Trigger habe ich nun mal mit einem CommandButton realisiert.

Du kannst natürlich den Auslöser Worksheet_BeforeDoubleClick(…) wählen

Folgend die einezelnen Codeschnippsel die im Wesntlichen bestehen aus:77

- mdlCore_PDF.PDF_PrintToPdf
- mdlCore_FAFHELPERS.FAFHELPERS_GetFileName
(FAF steht für FilesAndFolders)

Wenn du den Code durchliest wirst du sehen, das ich - imemer - den Befehl CALL verwende (das ist unüblich, wird auch nicht immer gern gesehen. Ich jedoch benutze es defintiv in den Projekten damit ich gefolgt vom Bezeichner des Hauptmoduls immer erkenne woher die nächste Prozedur/Funktion/Routine stammt:

also zB Call PDF_PrintToPdf kommt IMMER aus dem Modul: mdlCore_PDF.

Neben dem Code lade ich auch die Excel Datei sowie die ReadMe.txt (diese enthält nur die Lizenzbedingungen (free)) hoch.

PrintToPdf_601.zip

(24.24 KiB) Noch nie heruntergeladen

PrintToPdf_601.zip

(24.24 KiB) Noch nie heruntergeladen

Wie funktioniert das.

Nach dem Aktivieren des Auslösers (eventuell umstellen auf DoubleClick()) wird der Dateiname ermittelt und generiert. Danach wird die .pdf-Datei erstellt und geöffnet.
Solltest du das Öffnen der Datei nicht wünschen einfach die letzte Zeile in PDF_PrintToPdf auskommetnieren (" ' ")

Versuche das einmal in dein Projekt zu integrieren. Nur Mut und nicht verzweifeln. Gerne Rückfragen wenn es "hapert" ich/wir helfen gerne.

LG thowe

NS: noch mehr zu Drucker findest du hier: PrinterPlayarounds

[d'r Bastler]

Moin thowe,
kurz zu Deiner Anmerkung zum Thema call

Dieser Aufruf ist tatsächlich obsolet und das Ziel das Du beschreibst leichter auffindbar sehe ich damit auch nicht erreicht. In großen -lange gewachsenen- Projekten nutze ich dies:

Ich stelle der aufzurufenden Prozedur einfach den Modulnamen voran: mdlSommer.Frische, mdlHerbst.Blues, etc. Im Modul nutze ich dann das DropDown links oberhalb des Codes.

lg

[Hobbit]

Moin,
vielen Dank für deine Dateien.
Bei uns auf der Arbeit kann ich leider keine ZIP HERUNTERLADEN.
Ich habe es von meiner Privaten mail auf die Arbeitsmail geschickt, aber da sehe ich in der Xlsm Datei nicht den Code.
Kann man das irgendwie anders Regeln?
Vielen Dank für die Mühe.

MFG Jens

[d'r Bastler]

Moin Jens,

thowe ist derzeit mit Weinlese beschäftigt, und hat daher noch nicht geantwortet. Ich habe Dir die vier Klassen mal extrahiert und hier als Anhang eingestellt. Die musst dann Stück für Stück in eine Testmappe importieren. Kopiere Dir die Dateien am besten ins selbe Verzeichnis, wie Deine Testmappe.

• VBEditor mit Alt + F11 öffnen

• Im Projekt-Fenster mit der rechten Maustaste importieren auswählen und eine Datei auswählen

• wiederholen, bis alle vier Dateien in Deiner Mappe sind

• Du findest dann ein Scheet namens PrintToPdf mit einem entsprechenden Button

Falls Deine IT auch diese Downloads nicht zulässt, lass wissen. Dann baue ich sie in .txt-Dateien um, die du dann hoffentlich ziehen darfst.

lg

[Hobbit]

Moin,
tut mir leid, aber alle Dateien wo Codes hinterlegt sind kann ich nicht Downloaden.

Wenn du es in eine Textdatei rein kopieren könntest, wäre ich dir sehr Dankbar.

Vielen Dank für die Mühe

MFG Jens

[d'r Bastler]

Autsch, jetzt erst mal die XL-Datei von thowe, vielleicht klappt das ja schon ...

PrintToPdf_601.xlsm

(27.41 KiB) Noch nie heruntergeladen

Die vier Dateien als .txt kommen gleich nach.

Die Datei wks~ braucht die Endung .cls, die drei anderen .bas. Hoffentlich klappt's diesmal ...

wksPrintToPdf.txt

(507 Bytes) Noch nie heruntergeladen

mdlCore_PDF.txt

(2.16 KiB) Noch nie heruntergeladen

mdlCore_FAFHELPERS.txt

(1.29 KiB) Noch nie heruntergeladen

mdlCore_APP.txt

(2.58 KiB) Noch nie heruntergeladen

PrintToPdf_601.xlsm

(27.41 KiB) Noch nie heruntergeladen

Viel Erfolg!
lg

Und falls das auch wieder nicht klappt: einen Weg gibt es noch ...