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