Question

在Excel VBA中，我想将数据写入两个PowerPoint演示文稿，有人能用一些代码指出我正确的方向吗？我可以通过一个演示文稿找到它，但不能同时使用两个演示文稿。

任何帮助表示赞赏！

伪代码：

Open PP1
Open PP2

for i = 1 to 10
    do some calcs in excel
    create new slide in PP1 and add data
    create new slide in PP2 and add data
loop

Close PP1
Close PP2

Answer 1

正如@PortlandRunner所说，最好向我们展示你已经拥有的代码。

但总的来说，你是：

将两个变量变暗为对象或演示，取决于您是喜欢晚期还是早期绑定，让我们说oPres1和oPres2

Set oPres1 = oPPTObject.Presentations.Open("C:\some\folder\SomePresentation.pptx")
Set oPres2 = oPPTObject.Presentations.Open("C:\some\folder\SomeOTHERPresentation.pptx")

With oPres1
   ' Do stuff
End With
With oPres2
   ' Do Stuff
End With

关闭两个演示文稿

Excel VBA与2个Powerpoint演示文稿进行对话

1 个答案: