Custom json to excel

Public Sub customjsontoexcel()
myjson = "{'error': false,'details': [{'name': 'AKSHAY','age': 25,'id': 'AV123','place': 'BANGALORE'}]}"
Set JSON = ParseJson(myjson)
Debug.Print JSON("error") 'prints false
Debug.Print JSON("details")(1)("name") 'prints Akshay
Debug.Print JSON("details")(1)("age")
Debug.Print JSON("details")(1)("id")
Debug.Print JSON("details")(1)("place")
End Sub
'add a loop to JSON("details") if there are multiple objects in that array.
'credits - https://codingislove.com/excel-json/