Boa noite,

O provedor da API definiu um limite de 20 registros no json. Por exemplo tenho 415 registros. Teria alguma forma de pegar todos os registros via GET sem limite?

{"offset":0,"limit":20,"total":415,"hasNext":true,"content":[{"id":5816515,"

Private Function GetResponse(ByVal url As String) As String
Const RunAsync As Boolean = True
Const ProcessComplete As Integer = 4
Sheets("getLayer").Select

'Limpa área que irá receber os dados
Worksheets("getLayer").Range("A1:C1000").ClearContents

Dim request As MSXML2.XMLHTTP60
Set request = New MSXML2.XMLHTTP60

Dim response, result As String
Dim procura As Variant

With request

.Open "GET", url, RunAsync
.setRequestHeader "Content-Type", "application-json"
.send

Do While request.readyState <> ProcessComplete
DoEvents
Loop

response = .responseText

Set request = Nothing

End Function