MS Access VBA：“Docmd.RunCommand AcCmdOutputToExcel”函数最近停止工作

如何解决MS Access VBA：“Docmd.RunCommand AcCmdOutputToExcel”函数最近停止工作

多年来，我一直在许多站点的许多数据库中使用 VBA 中的这个内置 MS Access 函数“Docmd.runcommand AcCmdOutputToExcel”。这段代码现在刚刚停止工作。有没有其他人在使用 MS Access 2016-2019 或 365 时遇到过这个问题？

这是我的代码示例。它通过单击表单上的命令按钮运行：

    Private Sub Command4_Click()
    On Error GoTo C4_Err
    DoCmd.Echo False
    DoCmd.SetWarnings False
    DoCmd.OpenQuery "Sales by Sales Type Export"
    **DoCmd.runcommand acCmdOutputToExcel**
    DoCmd.Close acQuery,"Sales by Sales Type Export"
    DoCmd.SetWarnings True
    DoCmd.Echo True
    Exit Sub

    C4_Err:
    DoCmd.SetWarnings True
    DoCmd.Echo True
    MsgBox Err.Description
    Exit Sub
    End Sub

请注意，直到最近，通过所有 MS Access 升级，此代码已在此数据库中运行了 12 年。查询在数据表视图中打开，但我现在收到此错误消息：

“[DatabaseName] 无法将输出数据保存到您选择的文件中。”

此代码从未需要选择文件。它是一个内置的 Microsoft Access 功能，取代了在 Access 2.0 和 Access 95 中使用的旧“DoMenuItem”。

对此的任何帮助将不胜感激。

谢谢，

西拉