ich möchte gerne diverse Tabellenblätter direkt in eine pdf-Datei ausdrucken. Das funktioniert soweit auch ganz gut.
Gibt es darüber hinaus die Möglichkeit, dem Drucker gleich den Zieldateinamen (z.B. Test.pdf) oder aber auch den kompletten Zielpfad (z.B. c:\muster\test.pdf) mitzuteilen?
Sub Drucken1()
Application.ActivePrinter = "FreePDF XP auf Ne00:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End
oder:
Sub Drucken2()
Application.ActivePrinter = "Acrobat PDFWriter auf LPT1:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
End