由于升级到 Access 2013 输出到命令(到 PDF)不起作用

Since upgrading to Access 2013 OutputTo command (to PDF) doesnt work

三年来,我一直在使用 Access 2010 使用我的 Access(accdb 格式)数据库。从那以后我最近升级到 Access 2013,OutputTo 代码行(见 post 的底部)不起作用我得到

The Command or Action OutputTo isn't available now

。我看到很多人都有类似(但不相同)的问题,none 的建议对我有用。

但是,如果我在按住 Shift 键的情况下启动 Access,输出将完美运行,所以我认为它与 VBA 代码(见下文)没有任何关系,更多的是权限问题。

非常感谢您提供解决方案,谢谢

这是我的代码

  DoCmd.OutputTo acOutputReport, "Vehicles Due In", "PDFFormat(*.pdf)", "C:\Users\User\Google Drive\Cars\Vehicles Due In.pdf", False, "", , acExportQualityPrint

更新编辑:添加评论中的代码

On Error GoTo Err_cmdReportPreview_Click 
   Dim stDocName As String 
   DoCmd.OutputTo acOutputReport, "Overdue Balances", "PDFFormat(.pdf)", _
     "C:\Users\User\Google Drive\Cars\Overdue Balances.pdf", False, "", , _
     acExportQualityPrint DoCmd.OutputTo acOutputReport, "Vehicles Due In", _
     "PDFFormat(.pdf)", "C:\Users\User\Google Drive\Cars\Vehicles Due In.pdf", _
     False, "", , acExportQualityPrint 
Exit_cmdReportPreview_Click: 
    Exit Sub 
Err_cmdReportPreview_Click: 
    MsgBox Err.Description 
    Resume Exit_cmdReportPreview_Click 
End Sub

我会尝试将 "PDFFormat(*.pdf)" 更改为 acFormatPDF 常量 - 这会让您知道您的版本是否支持此方法,因为看起来您错过了 space你的字符串。该常量的计算结果应为 "PDFFormat (*.pdf)"

要尝试的第二件事是在 OutputTo 命令之前使用 Me.SetFocus。这可以解释为什么当您使用密钥而不是自动时它会起作用。我不确定当您在禁用启动的情况下单击按钮与手动 运行 时表单中发生了什么操作,但您可能会强迫它保持焦点。