Ich versuche, einen Bereich von einem Blatt als PDF über VBA zu speichern. Es folgt der Code, den ich geschrieben habe.

Sheets("PO Format").PageSetup.PrintArea = "$B$6 : $J$42"
Sheets("PO Format").Range("B6:J42").ExportAsFixedFormat Type:=xlTypePDF, Filename:=Sheets("User Settings").Range("B15") & "/" & Sheets("PO Format").Range("F7"), Quality:=xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=True

Das Seltsame ist, dass es auf einem System einwandfrei funktioniert und ich es unter dem angegebenen Pfad speichern und dann auch eine E-Mail senden kann, aber beim Testen auf einem anderen System wird der Fehler als "Fehler beim Drucken" angezeigt. Völlig ahnungslos. Kann jemand helfen?