title: Handle JSON Object in XMLHttp response in Excel VBA Code
body: <p>I need to handle a JSON Object which is the response of XMLHTTPRequest in Excel VBA. I wrote the code below, but it doesn't work:</p>
  
  <pre><code>  Dim sc As Object
    Set sc = CreateObject("ScriptControl")
    sc.Language = "JScript"
  
    Dim strURL As String: strURL = "blah blah"
  
    Dim strRequest
    Dim XMLhttp: Set XMLhttp = CreateObject("msxml2.xmlhttp")
    Dim response As String
  
    XMLhttp.Open "POST", strURL, False
    XMLhttp.setrequestheader "Content-Type", "application/x-www-form-urlencoded"
    XMLhttp.send strRequest
    response = XMLhttp.responseText
    sc.Eval ("JSON.parse('" + response + "')")
  </code></pre>
  
  <p>I am getting the error <strong>Run-time error '429' ActiveX component can't create object</strong> in the line  <code>Set sc = CreateObject("ScriptControl")</code></p>
  
  <p>Once we parsed the JSON Object, how do you access the values of the JSON Object?</p>
  
  <p>P.S. My JSON Object sample: <code>{"Success":true,"Message":"Blah blah"}</code></p>