FreePDF -Mail Versand
07.04.2008 15:55:00
Heinz
Der untere Code erstellt mir mit FreePDF eine PDF Datei.
Funkt Super.
Könnte man ein Makro erstellen, zum Versenden per Mail an die Mailadresse steht in S2.
Also nach Prinzip : PDF erstellen - PDF versenden.
Ist das über Excel überhaubst machbar ?
Gruß
Heinz
Option Explicit
Sub PDF_Erstellen()
Application.ActivePrinter = "FreePDF XP auf Ne01:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"FreePDF XP auf Ne01:", Collate:=True
End Sub