habe folgendes Makro im Archiv gestöbert was auch solange funktioniert, bis ich den Speicherpfad angebe (mit prtofilename xxx). Dann wird zwar die Datei als pdf gespeichert, jedoch lässt sich das pdf nicht öffnen ...
Sub pdf_erstellen()
Application.ActivePrinter = "FreePDF_XP auf Ne02:"
ActiveWorkbook.PrintOut Copies:=1, ActivePrinter:="FreePDF_XP auf Ne02:", _
Collate:=True, prtoFilename:="C:\" & strName & "TEST " & Format(Date, "MM-YYYY") & ". _
pdf"
End Sub
Was muss ich ändern?DAnke!
Dani