excel - 从 Excel VBA 编辑嵌入式 PowerPoint

Question

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

Answer 1

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

在 VBA 窗口中，选择工具 | 参考
查找Microsoft Powerpoint 12.0 对象库并检查它

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

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

注意：此代码假定 PowerPoint 对象被命名为Object 1（查看左上角以查看它的真正名称）并且它位于活动工作表上。

3.获取Presentation对象的引用

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

4. 操纵它

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

p.Slides.Add 1, ppLayoutBlank

5.取消选择

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

[a1].Select

希望有帮助！