從Excel VBA編輯嵌入式PowerPoint VBA

Question

我在Excel工作簿中嵌入了PowerPoint演示文稿。我如何使用VBA編輯它（打開，複製幻燈片，添加數據到幻燈片，關閉）？

Answer 1

1至PowerPoint對象模型的引用添加到您的VBA應用

從VBA窗口中，選擇工具|參考
查找微軟Powerpoint 12.0對象庫，並檢查它

2.選擇並激活PowerPoint演示文稿對象

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

注：此代碼假定PowerPoint對象名爲對象1（查看左上角的內容，查看它的真名）以及它位於活動工作表上。

3.獲取對演示文稿對象

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

4.參考操縱它

所有方法和演示文稿對象的屬性都可以給你。下面是添加幻燈片的例子：

p.Slides.Add 1, ppLayoutBlank 

5.取消選擇它

最簡單的方法就是選擇一個單元格。

[a1].Select 

希望有幫助！