2010-09-10 152 views
0

我正在使用以下代碼通過使用報表的命令按鈕生成打印對話框。通過使用打印對話框,只需在printername中選擇PDF ...將其更改爲PDF格式。女士訪問2003報告

但我希望將報告直接轉換爲PDF而不會提示打印對話框。

Private Sub Wrapper_History_Click() 
On Error GoTo Err_Wrapper_History_Click 

    Dim stDocName As String 

    DoCmd.OpenReport "rptEventLog", acPreview, , _ 
     "[TrackingNumber] = Forms!frmReviewReleaseWrapper!RevRelTrackingNumber" 
    DoCmd.RunCommand acCmdPrint 

Exit_Wrapper_History_Click: 
    Exit Sub 

Err_Wrapper_History_Click: 
    MsgBox Err.Description 
    Resume Exit_Wrapper_History_Click 

End Sub 

回答

0

對於Access 2003和orlder使用A2000ReportToPDF is an Access 2000 database containing a function to convert Reports and Snapshot files to PDF documents.否PDF需要打印機驅動程序。自由。

我對Access 2007和2010的理解是,內置的PDF功能運行良好。 Access 2010不再具有快照打印功能,因此您無法在A2010中使用Lebans解決方案。

+0

所有這些都假設您正在將Access報告打印到PDF。我經常需要輸出到Word文檔並生成PDF,這在Office 2007/2010中是可行的,但在Office 2003和之前,一個好的解決方案是PDFCreator(http://sourceforge.net/projects/pdfcreator/) ,它可以通過VBA自動生成(並附帶代碼示例)。 – 2010-09-11 19:37:56