빗썸 지수 엑셀 확인하기 - VBA

빗썸 지수 BTMI , BTAI가 있습니다.

 

빗썸 API 문서에 가면 확인 가능합니다.

 

코드는 아주 심플하고 Response 값도 아주 심플합니다.

 

사실문제는 이걸 어떻게 사용하느냐가 문제입니다.

 

코스피 지수 처럼 현재 빗썸에 돈이 유입되고 있는지 유출되고 있는지 정도인 것 같습니다.

 

거래를 할 때 하나의 참고 용도로 사용하시기 바랍니다.

Sub btci()
Set whttp = CreateObject("winhttp.winhttprequest.5.1")

whttp.Open "get", "https://api.bithumb.com/public/btci"
whttp.send

Set result = JsonConverter.ParseJson(whttp.responsetext)

Btai_index = result("data")("btai")("market_index")
Btmi_index = result("data")("btmi")("market_index")

End Sub

 

Btai_index와 Btmi_index 값을 사용하시면 됩니다.

 

JsonConverter는 아래 링크 참조하시면 됩니다.

코인 거래소 (업비트 코인원 빗썸 등) API 엑셀 파싱 사용하기 - VBA json 파싱 (tistory.com)

코인 거래소 (업비트 코인원 빗썸 등) API 엑셀 파싱 사용하기 - VBA json 파싱

 

 

혹시나 코인의 시가총액이 궁금하시면 코인마켓 캡 사이트를 사용하시면 됩니다.

 

엑셀에서 사용하려면 아래 링크 참조하시면 됩니다.

 

코인마켓 캡(CoinMarketCap) API 엑셀로 적용 방법 소개 - VBA (tistory.com)

코인마켓캡(CoinMarketCap) API 엑셀로 적용 방법 소개 - VBA