neuer versuch: beschädigte pdf-datei
22.09.2004 13:40:51
katja
Bin VB-Anfänger und habe ein Problem.
Ich drucke bzw. speicher mit folgendem code exceldateien als pdf und vergebe automatisch deren Dateiname.
Sub als_PDF_speichern()
Dim Dateiname As String
Sheets("Tabelle2").Select
Dateiname = Range("AO7").Text & ".pdf"
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1, Preview:=False, ActivePrinter:="PDF Writer (GhostScript)", PrintToFile:=True, Collate:=True, PrToFileName:="G:\TEAM\Katja\" & Dateiname
End Sub
Funktioniert und wird auch in den angegebenen ordner abgelegt, jedoch beim öffnen mit adobe reader 6.0 bekomme ich folgende meldung:
Adobe Reader konnte "test.pdf" nicht öffnen, da der Dateityp nicht unterstützt wird oder die Datei beschädigt ist (z.B. wenn sie als E-Mail-Anhang geschickt und nicht korrekt dekodiert wurde).
Weiß irgendjemand woran das liegen könnte?
(Wenn ich die Datei manuell als pdf speicher, gibt es keine Probleme.)
Danke schon im Voraus
Mfg
Katja