OutPutTo消除SaveAs对话框

Question

我目前正在使用Microsoft Access 2010.有没有办法消除SaveAs对话框？运行命令后显示，然后单击“取消”时，将报告打印到正确的位置。它每次都显示出细微差别。

Public Sub PrintReportToPDF(ByRef strReport As String, ByRef FilePathandFileName As String) 

    On Error GoTo ErrHandler
    DoCmd.SetWarnings False

    DoCmd.OpenReport strReport, acViewNormal
    DoCmd.OutputTo acOutputReport, strReport, acFormatPDF,   
    FilePathandFileName & ".pdf", False, "", 0, acExportQualityPrint


ExitHere:
    DoCmd.SetWarnings True
    Exit Function

ErrHandler:
    MsgBox Err.Description
    Resume ExitHere

End Sub

Answer 1

没关系，我弄明白为什么显示PDF另存为对话框。您需要更改Print2Pdf软件中的配置。它与实际代码本身无关。