Одним из простых способов получения данных из криптовалютных торговых бирж в программу MS Excel для дальнейшего использования или анализа , это вставка программного кода в сам Excel.
Программа на VBA подключается к бирже через API и в зависимости от того, какие вы хотите получить данные меняете строку подключения. В результате получаете данные в виде стоки, которую в дальнейшем в коде можно распарсить по своему усмотрению.
Вот простой пример получения текущей цены торгуемой пары EOS/ETH с биржи Binance:
Private Sub Workbook_Open()
Set XMLHTTP = CreateObject("Microsoft.XMLHTTP")
XMLHTTP.Open "GET", "https://api.binance.com/api/v3/ticker/price?symbol=EOSETH", False
XMLHTTP.Send
If XMLHTTP.statustext = "OK" Then
txt = XMLHTTP.responseText
Cells(2, 5) = txt
txt = Mid(txt, 29, 10)
Cells(2, 3) = txt
End If
XMLHTTP.abort
Set XMLHTTP = Nothing
End Sub
Эта простенькая программа считываемую строку, для примера, выводит в ячеку MS Excel вот в таком виде:
{"symbol":"EOSETH","price":"0.02672500"}
Ну а дальше вырезает текущую цену с помощью функции VBA MID начиная с 29 символа и длиной 10 и вставляет в другую ячейку Excel.
Можно конечно нужное значение строки вырезать и другими функциями VBA, например Replace, заменяя ненужные символы пустой строкой, но это дело вкуса каждого.
Например так, в два этапа
txt = Replace(txt,"{""symbol"":""EOSETH"",""price"":""", "")
txt = Replace(txt, """}", "")
Вот таким простым способом можно взаимодействовать с криптовалютными биржами через MS Excel на VBA.