Как использовать AWS SKD для .Net в VBA?

Question

Я пытаюсь добавить AWS Comprehend NLP в свой проект VBA, но, похоже, VBA не поддерживается. AWS предоставляет .NET SDK. Каков наилучший способ сделать классы из этого SDK доступными для моего кода VBA?

Вот макет модуля VBA, чтобы передать строку текста в Comprehend и получить анализ настроений обратно. Очевидно, что на самом деле это не работает.

Этот модуль может быть очень полезен всем, кто работает в VBA и хочет добавить службы AWS в свой инструментарий. Вы можете помочь?

Function putAWSComprehendJSON(link As String, apiKey As String, apiSecret As String, text2comp As String) As Dictionary
'link=https://Comprehend.us-east-1.amazonaws.com
Dim endpoint as String
endpoint = "/api/endpointX"
'VBA-JSON module installed from github to handle Json packing and unpacking
Dim jsonResponse As Dictionary
Dim jsonRequest As Dictionary
Set jsonRequest = New Dictionary
jsonRequest.Add key:="action", item:="detect-sentiment"
jsonRequest.Add key:="content", item:=text2comp
jsonRequest.Add key:="content-usage-code", item:="en"
jsonRequest.Add key:="region", item:="usl-east-1"
jsonRequestBody = JsonConverter.ConvertToJson(jsonRequest)
Dim web As msxml2.XMLHTTP60
Set web = New msxml2.XMLHTTP60
With web
    .Open "POST", link & endpoint, False, apiKey, apiSecret
    .setRequestHeader "cache-control", "private"
    .setRequestHeader "Cache-Control", "max-age=0"
    .setRequestHeader "Content-type", "application/json"
    .setRequestHeader "Authorization", "Basic " & EncodeBase64
    .send jsonRequestBody
End With
While .readyState 4
DoEvents
Wend
Set putAWSComprehendJSON = JsonConverter.ParseJson(web.responseText)
End Function