본문 바로가기
코인/바이낸스API

바이낸스 API 엑셀 내 보유 코인 정리 - VBA

by 큐브빌드 2021. 5. 8.
반응형

열심히 바이낸스 API를 활용하기 위한 글 3개를 작성했습니다. (아래 링크 있습니다.)

 

먼저 바이낸스 API 사용 신청을 하셔야 합니다.

 

신청하시면 Secret-key와 API-key를 제공합니다.

 

그걸 활용해서 지갑을 정리할 수 있습니다.

 

선행작업으로 레퍼런스를 추가해야 합니다.

 

도구 > 참고에서 Microsoft XML, v3.0과 Microsoft WinHTTP Services, version 5.1을 추가하셔야 합니다.

 

 

 

 

 

Sub BinanceAccount()






APIKEY = "api키"


SecretKey = "secret키"



'서버시간 받아오기



Dim WH As New WinHttp.WinHttpRequest



WH.Open "get", "https://api.binance.com/api/v3/account"



WH.send



WH.waitForResponse



UTimeStamp = TimeStamp(ChangeDate(WH.getResponseHeader("Date")))



querystring = "timestamp=" & UTimeStamp



stdin = digest_HMACSHA256(querystring, SecretKey)



URL = "https://api.binance.com/api/v3/account?" & querystring & "&signature=" & stdin



WH.Open "get", URL


WH.setRequestHeader "X-MBX-APIKEY", APIKEY


WH.send


WH.waitForResponse




End Sub

해당 코드를 실행하시면 WH.responseText 값에 결괏값이 나옵니다.

 

해당 값을 파싱 하여 정리하시면 됩니다.

 

ChangeDate 코드

 

TimeStamp 코드

digest_HMACSHA256 코드

VBA가 어려우신분을 위해 제가 사용하는 파싱 엑셀도 포함했습니다.

binance_account.xlsm
0.02MB

엑셀에 API-KEY와 Secret-Key 입력 후 버튼 누르시면 자동으로 정리 됩니다.

반응형

댓글