I have the following code:
Function filejson(json) Dim objStream, strData Set objStream = CreateObject(\"ADODB.S
For me the solution was to add the URL in trusted sites.
Internet explorer browser > Tools > Internet options > Security > Trusted sites > Sites > Add the URL under "Add this website to the zone: " and click add and save.