☰

Powerpoint VBA 参考

tag-icon • tag-icon vba microsoft-powerpoint
Powerpoint VBA 参考

我正在 Powerpoint 上编写 VBA 代码，需要调用 Excel 文件进行输入。程序运行良好，运行无错误，并生成输出，但调用 Excel 文件的部分除外。它根本无法打开 Excel 文件。

写了 3-4 行代码来调用 excel 文件，它也能无错误地运行，但不会打开文件。我怀疑我在参考资料中遗漏了一些东西。

代码如下：

Sub Test()

Dim Booki As Excel.Application
Set Booki = New Excel.Application

Booki.Workbooks.Open "C:\Users\Kashyap\Desktop\Test.xlsx"

End Sub

添加的参考资料包括：a) Visual Basic 应用程序 b) Microsoft powerpoint 14.0 对象库 c) OLE 自动化 d) Microsoft Office 14.0 对象库 e) Microsoft Excel 14.0 对象库

有人能告诉我我缺少什么库吗？

答案1

如果您想查看新打开的 Excel 实例，则必须使其可见（见下文）。完成后，您还需要关闭工作簿和 Excel，否则您将有孤立的任务闲置并占用内存。事实上，在测试下面的代码之前，请启动任务管理器，查看进程并终止任何 Excel.exe 实例。

Sub Test()

Dim Booki As Excel.Application
Dim Wb As Excel.Workbook

Set Booki = New Excel.Application

Set Wb = Booki.Workbooks.Open("C:\temp\test.xlsx")

' if you want to SEE the result,
Booki.Visible = True

' show us something from the workbook to prove that it's open:
MsgBox Wb.Worksheets(1).Cells(1, 1).Value

Wb.Close
Booki.Quit

Set Wb = Nothing
Set Booki = Nothing

End Sub

相关内容