Vbscript 查找幻灯片的属性

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

开始这样做的标准方法是将其记录为VBA中的宏，然后将该宏“翻译”为VBScript。描述了翻译过程中需要注意的事项

在您的情况下，这样做可能会：

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

---

请注意，这将返回布局的编号。如果需要名称，则必须创建数字到的映射。

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

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

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

---

演示文稿。正常打开在新的可见窗口中打开演示文稿；为了做到这一点，应用程序必须是可见的（否则会出现错误）。这就是为什么你需要让PPT可见。如果您打开演示文稿无窗口（上面最后一个错误参数），则不需要让应用程序可见。

演示文稿基于模板；演示文稿中的所有幻灯片都将基于同一模板，Ansgar的.TemplateName属性（演示文稿、备注，而不是特定幻灯片的）将给出第一个问题的答案。您需要幻灯片的哪些特定属性？我这里的意思是，如果我有一个演示文稿，幻灯片1包含“标题和内容主题”，幻灯片2包含“标题主题内容”，我的演示文稿是这样的，每个幻灯片都有不同的主题。我想通过使用VBScriptThansgar以编程方式找到每张幻灯片的主题，还有一个问题，我们不能将visible设置为True吗？我不希望ppt在screeen上打开。我试图通过注释并将选项设置为false，但出现错误“请求无效。不允许隐藏应用程序窗口”。这似乎是不可能的。请不要发布“谢谢”注释。如果你想感谢别人，正确的方法是投票和/或他们的答案。