excel - 从 Excel VBA 编辑嵌入式 PowerPoint

Question

我在 Excel 工作簿中有一个嵌入的 PowerPoint 演示文稿。如何使用 VBA 编辑它(打开、复制幻灯片、向幻灯片添加数据、关闭)？

Answer 1

1. 将 PowerPoint 对象模型的引用添加到您的 VBA 应用程序

在 VBA 窗口中，选择 工具 |引用文献
寻找 Microsoft Powerpoint 12.0 对象库 并检查它

2.选择并激活PowerPoint演示对象

ActiveSheet.Shapes("Object 1").Select
Selection.Verb Verb:=xlOpen

注意:此代码假定 PowerPoint 对象名为 对象 1 (查看左上角以查看它的真正名称)并且它位于事件工作表上。

3. 获取Presentation对象的引用

Dim p As PowerPoint.Presentation
Set p = Selection.Object

4. 操作

您可以使用演示对象的所有方法和属性。这是添加幻灯片的示例:

p.Slides.Add 1, ppLayoutBlank

5.取消选择

最简单的方法就是选择一个单元格。

[a1].Select

希望有帮助!