查找幻灯片的属性

Question

如果我使用VBScript打开PowerPoint演示文稿，是否可以在打开的PowerPoint中自动查找用于每张幻灯片的模板名称？有没有我能找到幻灯片的属性？

Answer 1

开始使用这种方法的规范方法是将其记录为VBA中的宏，然后将该宏“转换”为VBScript。翻译需要注意的事项here。

在你的情况下，这样的事情可能会这样：

Set pp = CreateObject("PowerPoint.Application")
pp.Visible = True

Set presentation = pp.Presentations.Open("C:\path\to\your.ppt")
WScript.Echo presentation.TemplateName
slide.Close

可以像这样检索每张幻灯片的布局：

For Each slide In presentation.Slides
  WScript.Echo slide.Layout
Next

请注意，这将返回布局的编号。如果您想要一个名称，则必须创建一个dictionary，将数字映射到layout names。

Answer 2

我不确定这在VBS中是如何工作的，但在VBA中你可以：

Set pp = CreateObject("PowerPoint.Application")
'pp.Visible = True

Set presentation = pp.Presentations.Open("C:\path\to\your.ppt", False, False, False)

Presentations.Open通常在新的可见窗口中打开演示文稿;为了做到这一点，应用程序必须是可见的（否则你会收到错误）。这就是你需要让PPT可见的原因。如果您打开无窗口演示文稿（上面的最后一个假错误），则不需要让应用程序可见。