Auf Thema antworten

Hallo,

die Reportausgabe als pdf kann einen manchmal wirklich zur Verzweiflung bringen, weil die Verzeichnisverwaltung von Window/Access einem einen Strich durch die Rechnung macht. Denn wenn man z.B. direkt unter C:\  speichern möchte, benötigt man Adminrechte. Der Reportexport als PDF klappt dann nicht. Auch Sonderzeichen im Datei- oder Pfadname, etc. werden nicht unbedingt richtig interpretiert.


Ich gebe PDFs grundsätzlich nur mit dem Reportname als Dateiname aus. Dann legt Access die PDF  in das Arbeitsverzeichnis der DB. Auch dabei muss die Dateierweiterung .PDF groß geschrieben werden damit es funzt. In einem weiteren Schritt kopiere ich die PDF dann mit FileCopy dahin, wohin ich sie haben möchte.


[CODE]Private Sub Button_PDF_Click()

On Error GoTo err_pdf

  Dim Dateiname As String

  Dim Zieldatei As String

  Dateiname = Application.CurrentProject.Path & "\Reportname.PDF"

  Zieldatei = "C:\users\an\ReportnameZiel.PDF"

  DoCmd.OutputTo acOutputReport, "Reportname", acFormatPDF, Dateiname

  FileCopy Dateiname, Zieldatei

  Kill Dateiname

  Msgbox ("Report wurde als PDF exportiert: " & Zieldatei)

  goto noerr

err_pdf:

  Msgbox "Fehler PDF-Ausgabe" & " " & Err.Number & " " & Err.Description

noerr:

   on error goto 0 

End Sub[/CODE]


Zurück
Oben