|
Danke schonmal
Aber geht es vielleicht ein gaaanz klein bisschen konkreter als "CreateObject("Excel.Application") ;)" ?
Mein Script sieht bislang so aus:
Dim pdfApp
Set pdfApp = Wscript.CreateObject("Word.Application")
pdfApp.documents.Open("C:\Temp\test.pdf")
pdfApp.ActivePrinter = "Microsoft Print to PDF"
pdfApp.Documents(1).PrintOut
pdfApp.Documents(1).Close
pdfApp.Quit
Set pdfApp = Nothing
Damit gibt es 2 Probleme:
1) Die Schrift wird durch eine völlig andere ersetzt und die Texte sind nicht mehr lesbar
2) Auch hier bekomme ich es nicht hin den Ziel-Speicherort im Script zu definieren
|