0

所以我有一年前(在一台旧计算机上)编写的这个函数,它从我的 excel 文件中获取数据,并在 Publisher 中创建漂亮的单页数据摘要。我当时让它运行良好,但现在我正在重新访问它,我在代码的第一部分收到“Windows 内存不足”运行时错误。错误发生在下面的第二行:

Dim appPub As New Publisher.Application
appPub.Open Filename:="C:\Users\halle1\Documents\Temp.pub"
appPub.ActiveWindow.Visible = False
Dim DocPub As Document
Set DocPub = appPub.ActiveDocument

我怀疑问题出在这台新机器上的设置不同,但我不知道那可能是什么。上面的代码几乎是从 VBA 文档中复制/粘贴的......

任何想法或帮助将不胜感激!

4

0 回答 0