pdf-Drucken aus VBA
Torsten
mit folgendem Code möchte ich eine Tabelle als .pdf speichern:
Sub Makro1()
Application.ActivePrinter = "Adobe PDF auf Ne03:"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, ActivePrinter:= _
"Adobe PDF auf Ne03:", PrintToFile:=True, PrToFileName:=Sheets("Tabelle1").Range("A1") & _
".pdf"
End Sub
Die Datei wird zwar erzeugt, allerdings öffnet Adobe Reader diese Datei nicht, weil "dies entweder keine unterstütztes Dateiformat ist oder diese beschädigt ist" (Adobe-Fehlermeldung).Kann mir jemand helfen und mitteilen, wo ich ich noch einen Fehler mache?
Besten Dank für Eure Unterstützung im voraus.
Gruß
Torsten K.