VBA 64ビット環境でCreateObject("ScriptControl")がエラーになる

Question

下記、WEBのAPIをVBAで処理しているのですが、
64ビット環境のみCreateObject("ScriptControl")でエラーになってしまいます。
どのように対処すれば良いかわからず、ご質問させて頂きました。

Dim targetURI
targetURI = webAddress & "api/xxx"

'HTTP GET
Set HttpReq = CreateObject("MSXML2.XMLHTTP")
HttpReq.Open "GET", targetURI, False
HttpReq.send (Null)

'XML 受信
Dim restext As String
With CreateObject("MSXML2.XMLHTTP")
.Open "GET", targetURI, False
.send
Set oXML = .responseXML
restext = .responseText
End With

'JSONをパース
Set sc = CreateObject("ScriptControl") '←ここでエラー
sc.Language = "JScript"
sc.AddCode "function jsonParse(s) { return eval('(' + s + ')'); }"
Set objJSON = sc.CodeObject.jsonParse(restext)

Comments

[Tak1wa]

ExcelVBAですか？Officeも64bitでしょうか？

[Qoo]

はい。ExcelVBAです。
開発環境は32ビットExcelなのですが、
他のPCの64ビットExcelで実行するとエラーになるようです。