VB.NET中的ActivePresentation

时间:2017-10-24 11:21:31

标签: vb.net

在VBA中,我们有ActivePresentation。我想知道如何在VB.NET中做同样的事情。

我有以下代码

Dim oApp As PowerPoint.Application
Dim oPres As PowerPoint.Presentation = oApp.ActivePresentation

我的问题是我们如何在VB.NET中声明或使用ActivePresentation。

任何人都可以帮助我如何在VB.NET中使用ActivePresentation

1 个答案:

答案 0 :(得分:1)

首先,您需要将setup(..., packages=['mypkg'], package_data={'mypkg': ['*.dat']}, ) 声明为oApp应用程序,以创建PowerPoint的新实例。
这是必需的,因为你的代码没有运行"内部"与VBA一样的PowerPoint。

之后,您需要打开一个演示文稿(或创建一个新的演示文稿),然后通过New提供。

ActivePresentation

您还可以同时打开多个演示文稿,可以通过名称进行处理:

Dim oApp As New PowerPoint.Application
oApp.Presentations.Open("C:\test.pptx")
Dim oPres As PowerPoint.Presentation = oApp.ActivePresentation

...或索引(从1开始):

Dim oPres As PowerPoint.Presentation = oApp.Presentations("test.pptx")