Question

我有一个2010 PP演示文稿，它调用97-2000 excel图，它引用存储过程并通过sql进行一些数据检索。

尝试调用此文档时，我收到429错误。调试时，将突出显示以下代码。

Set appPP = GetObject(, "PowerPoint.Application")

vb不是我的技能，所以尽我所能，任何帮助都会感激不尽。

Answer 1

请改为尝试：

Sub Test()
    Dim oPPT As Object
    Set oPPT = CreateObject("PowerPoint.Application")
    If oPPT Is Nothing Then
        MsgBox "No luck"
    Else
        MsgBox oPPT.version
        oPPT.quit
        Set oPPT = Nothing
    End If
End Sub

活动X错误429

1 个答案: