VBA获取到数据后处理

Totoro1

rivate Function HttpGet(dh As String, ByVal Cookie As String) As String
    Dim HTTP As Object

    Set HTTP = CreateObject("Msxml2.ServerXMLHTTP.6.0")
    HTTP.open "GET", URL, False
    HTTP.SetRequestHeader "Cookie", Cookie

    HTTP.send

    HttpGet = HTTP.responseText


HttpGet的内容就是

{"code":200,"message":null,"falst":{"cont":[{"sssid":123123,"sssid1":123434123,"............,"sssid20":123434123,"}],"abd":1}}


请问下 get获取到数据后如何分割指定文本到列呢，例如上面的信息 我获取到了 ，如何将自己需要的信息获取出来 然后分别加入到后面的表格呢
比如我想像下列哪样操作 让他分割 该怎么写