Presentations.Open 需要打开 PowerPoint 2007？答案

【问题标题】：Presentations.Open requires PowerPoint 2007 to be open?Presentations.Open 需要打开 PowerPoint 2007？
【发布时间】：2014-12-10 17:37:32
【问题描述】：

我希望使用以下 VB 脚本调用 PowerPoint 文件 test.pptm 中的宏 runTest。在装有 Office 2010 的机器上调用脚本时一切正常，但脚本仅适用于 Office 2007，前提是在调用脚本之前已打开 PowerPoint 应用程序。我很想知道是否有人遇到过类似的问题，或者想知道任何潜在的解决方案。

Option Explicit
On Error Resume Next

RunProcess

Sub RunProcess() 

    Dim pptApp 
    Dim pptPresentation 
    Set pptApp = CreateObject("PowerPoint.Application") 
    Set pptPresentation = pptApp.Presentations.Open("C:\test.pptm", True) 
    pptApp.Run "test.pptm!runTest"
    pptApp.Quit 
    Set pptPresentation = Nothing 
    Set pptApp = Nothing 

 End Sub

【问题讨论】：

VBScript 调试 101：删除 On Error Resume Next 看看你得到了什么错误。

标签： vbscript powerpoint-2007

【解决方案1】：

我通过添加解决了问题

    pptApp.Visible = True

在创建 pptApp 之后和打开演示文稿之前。

【讨论】：

【解决方案2】：

如果它需要启动 Powerpoint，我会触发启动作为 vbscript 的一部分

Set WshShell = wscript.CreateObject("wscript.Shell")
WshShell.Run "C:\Program Files (x86)\Microsoft Office\Office12\POWERPNT.EXE"

您可以构建一些错误处理以查看安装的版本，并调用相应的 exe 文件

【讨论】：