В этом коде печатается неправильный текст ответа, предложите способ

Question

Я пишу точный json путь, но показывает неправильный внутренний текст. Я пробую это

Sub JnewFast()
Dim req As New MSXML2.XMLHTTP60
Dim URL As String, ws As Worksheet
Dim json As Object
Dim r, r1, r2, r3 As String

URL = "https://www.nseindia.com/api/quote-equity?symbol=PEL"
With req
.Open "GET", URL, False
.send
Set json = JsonConverter.ParseJson(.responseText)
End With
r = json("priceInfo")("lastPrice")
r1 = json("priceInfo")("intraDayHighLow")("min")
r2 = json("priceInfo")("intraDayHighLow")("max")
r3 = json("priceInfo")("close")
Debug.Print r, r1, r2, r3
End Sub

В r3 вместо закрытия печати "previousClose", пожалуйста, предложите мне правильный путь