Как подключиться к сайту sharepoint, используя учетные данные в коде vba?

Question

Как мне подключиться к сайту sharepoint, используя учетные данные в макросе vba?

Мой код:

Const sUrl As String = "https://MY_SITE/_api/Web/Lists/getByTitle(LIB_NAME)/files"
Dim oRequest As WinHttp.WinHttpRequest
Dim sResult As String   
Set oRequest = New WinHttp.WinHttpRequest

With oRequest
     .Open "GET", sUrl, True
     .setRequestHeader "Content-Type", "application/json"
     .SetCredentials USERNAME, PASSWORD, HTTPREQUEST_SETCREDENTIALS_FOR_SERVER
     .send
     .waitForResponse
     sResult = .responseText
     MsgBox sResult
End With

Я получаю "System.UnauthorizedAccessException".

Кто-нибудь может помочь мне с этим?

Как подключиться к сайту sharepoint, используя учетные данные в коде vba?

Ответы (0)