Предел запросов вызовов API Excel VBA

Question

Я пытаюсь получить данные из веб-API в Excel, используя VBA.В настоящее время я пишу в файл JSON.Код выглядит следующим образом:

Sub get_data(up_http, down_http)
    Dim xmlhttp: Set xmlhttp = CreateObject("msxml2.xmlhttp.6.0")

    xmlhttp.Open "get", up_http, False
    xmlhttp.send

    Dim fso: Set fso = CreateObject("scripting.filesystemobject")
    Dim newfile: Set newfile = fso.createtextfile(down_http, True)

    newfile.write (xmlhttp.responseText)
    newfile.Close

    Set newfile = Nothing
    Set xmlhttp = Nothing
End Sub

Sub Button1_Click()
    get_data _
        "https://accounting.sageone.co.za/api/2.0.0/TaxInvoice/get?apikey=
    {xxxxxxxx}&companyid=12345&includeDetail=true&includeCustomerDetails=true&$orderby=Created%20desc", _
        "C:\temp\tmp.json"
End Sub

Это все работает.Поставщик API установил ограничение в 100 вызовов в минуту, но это подтвердило, что я могу использовать функцию пропуска ODATA, чтобы обойти ограничение.Кто-нибудь может помочь с тем, как этого добиться?

Спасибо,

Стивен