Hallo Leute,
ich habe eine Exeldatei mit ca. 300 Blättern. Ich möchte diese alle einzeln als pdf speichern.
Das läuft auch richtig gut mit diesem Befehl:
Sheets(Blatt.Name).ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=vntFile, Quality:=xlQualityStandard, IncludeDocProperties:=True, _
IgnorePrintAreas:=False, OpenAfterPublish:=False
nur leider muß ich jedes Speichern einzeln bestätigen.
Was kann ich tun das das automatisch läuft ?
Vielen Dank für Eure Hilfe
|