vba - OutPutTo 消除另存为对话框

Question

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

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 软件中的配置。它与实际代码本身无关。