3

我有一个 Access 数据库，它根据数据库中的数据创建自定义 Word 文档。在过去的 10 年里，我通过多次计算机和软件升级成功地运行了它。我刚刚在新计算机 (Windows 7) 上安装了该程序，我收到错误 5981 - Could not open macro storage。

代码在下面的 ** 行跳闸：

Public Function CreateIndividualizedReport(FileDescription As String, FormTemplate As String, ClientFile As String, CallTheFile As String, Optional ClientType As Integer) As Boolean
    CreateIndividualizedReport = False

    Set glbWordObj = New Word.Application

    FilePath = DLookup("FilePath", "tblFileLocation", "FileDescription = '" & FileDescription & "'")
    **Set WordObjDoc = glbWordObj.Documents.Add(FilePath)**

我已经在网上搜索过这个，但所有解决方案要么不起作用（重命名Normal.dot文件），要么似乎适用于更旧版本的 Windows（这个错误的大多数帖子似乎可以追溯到 2000 年初）

最近有人看到这个问题或使用不同的代码与 Word 交互吗？

4

2 回答 2

2

我刚刚通过以下方式体验（并解决了）这个问题：

  1. 在 Windows 资源管理器中右键单击 Word 文件
  2. 选择属性
  3. 取消阻止文件（底部的复选框）。

注意：此复选框并不总是显示。仅当文件从另一台计算机发送给您时才会出现。Windows 10 然后将该文件标记为“不安全”，直到您手动选中此框。

于 2017-04-24T09:50:05.920 回答
1

这里有一个关于类似错误的很长（而且很有趣）的讨论：

http://social.msdn.microsoft.com/Forums/en/accessdev/thread/5dfefcc5-0483-4190-890e-d90947c2a507

底线：在运行该行以添加文档之前使 Word 应用程序可见。

于 2013-03-02T16:20:34.177 回答