Vba “输出以消除另存为”对话框

Vba “输出以消除另存为”对话框,vba,pdf,ms-access-2010,save-as,Vba,Pdf,Ms Access 2010,Save As,我目前正在使用Microsoft Access 2010。有没有办法消除“另存为”对话框?运行命令后,它会显示,然后单击“取消”时,它会将报告打印到正确的位置。这是一个细微的差别,它显示每一次 Public Sub PrintReportToPDF(ByRef strReport As String, ByRef FilePathandFileName As String) On Error GoTo ErrHandler DoCmd.SetWarnings False

我目前正在使用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

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