为什么创建ScriptControl对象失败？-运行时错误“ 429”：ActiveX组件无法创建对象

Question

  

OS： Microsoft Windows 10 Pro（64位）；版本：1809；内部版本：17763

     

应用程序：用于Office 365（64位）的Microsoft Excel；版本：16.0

     

VBE：用于应用程序7.1的Microsoft Visual Basic

---

我试图在VBA中编写JavaScript，但在开始编写它之前就遇到了问题。我在向ScriptControl分配对象引用的行上收到“运行时错误'429'：ActiveX组件无法创建对象”消息。

我希望您可以为此花些时间。非常感谢大家。非常感谢您的帮助。

这是给我错误的代码：

Option Explicit

Sub createJSObject_Early()

    Dim js As MSScriptControl.ScriptControl
    Set js = New MSScriptControl.ScriptControl 'This is the line that gives error
    js.Language = "JScript"

End Sub

我也尝试过，后期绑定：

Option Explicit

Sub createJSObject_Late()

    Dim js As Object
    Set js = CreateObject("ScriptControl") 'This is the line that gives error
    js.Language = "JScript"

End Sub

我什至从这些网站上复制了使用ScriptControl的示例代码并运行它，但是这些代码也给了我“运行时错误'429'”：

How to use javaScript from VBA

Learn How To Code JavaScript in VBA