VBA解析JSON

前言

vba作为一种古老的语言，是不能直接处理json数据的，但是好在可以加载其他语言的执行引擎，间接的达到解析JSON的目的

示例代码

Public Function JsonParse(jsonStr As String) As Object
    With CreateObject("HTMLFile")
       Set Window = .parentWindow
       Window.execScript "var json = " & jsonStr, "JScript"
       Set JsonParse = Window.json
    End With
End Function