엑셀 빗썸 API 연결하여 거래하기 - VBA

엑셀에 빗썸 API를 연결하여 거래하는 코드입니다.

 

빗썸에서 거래되는 코인 중 좋아 보이는 게 있어서 만들었네요.

 

참조해야 되는 레퍼런스 입니다. 

 

레퍼런스를 추가하지 않았으면 에러가 나게 됩니다.

※ 레퍼런스 추가는 도구 > 참조 입니다.

 

Sub bitplace()
Dim str As New Dictionary
Dim whttp As New WinHttp.WinHttpRequest
Url = "https://api.bithumb.com"
whttp.Open "get", Url
whttp.Send
Nows = ChangeDate(whttp.GetResponseHeader("Date"))
api_key = "API_KEY 입력"
api_secret = "SECRET_KEY 입력"
endpoint = "/trade/place"
str.Add "order_currency", "거래코인마켓"
str.Add "payment_currency", "KRW" 'BTC거래시 BTC로 변경
str.Add "units", "15.000" '거래 수량
str.Add "price", "100" '단가 가격
str.Add "type", "bid" '구매 = bid , 매도 = ask
str_data = "endpoint=%2Ftrade%2Fplace"
dum_str_data = DumText(str)
str_data = dum_str_data & "&" & str_data
nonce = TimeStamp(Nows)
Data = endpoint & Chr(0) & str_data & Chr(0) & nonce
utf8_hex_output = Hex_HMACSHA512(Data, api_secret)
api_sign = EncodeBase64(utf8_hex_output)
Url = Url & endpoint
whttp.Open "post", Url
whttp.SetRequestHeader "content-type", "application/x-www-form-urlencoded"
whttp.SetRequestHeader "Api-Key", api_key
whttp.SetRequestHeader "Api-Sign", api_sign
whttp.SetRequestHeader "Api-Nonce", nonce
whttp.Send (str_data)
result = whttp.ResponseText '결과값
End Sub

 

※ 함께 참고해야 되는 코드

바이낸스 API 적용을 위해 엑셀에서 Unix TimeStamp 만들기 - VBA (tistory.com)

바이낸스 API 적용을 위해 엑셀에서 Unix TimeStamp 만들기 - VBA

 

바이낸스 API 적용을 위한 서버시간 찾기 - VBA (tistory.com)

바이낸스API 적용을 위한 서버시간 찾기 - VBA

 

코인원 API V2 엑셀 인증을 위해 Hex_HMACSHA512 만들기 (tistory.com)

코인원 API V2 엑셀 인증을 위해 Hex_HMACSHA512 만들기

 

vba로 jwt 만들기 , 만드는 방법 - hs256 (tistory.com)

vba 로 jwt 만들기 , 만드는 방법 - hs256

 

※ 아래는 빗썸 API 문서 내용입니다.

Request Parameters는 아래 코드 부분입니다.

요청	변수 설명	타입
apiKey	사용자 API Key	String/필수
secretKey	사용자 Secret Key	String/필수
order_currency	주문 통화 (코인)	String/필수
payment_currency	결제 통화 (마켓) 입력값 : KRW 혹은 BTC	String/필수
units	주문 수량 [최대 주문 금액] 50억 원	Float/필수
price	Currency 거래가	Integer/필수
type	거래유형 (bid : 매수 ask : 매도)	String/필수

Response는 아래 코드 부분입니다.

필드	설명	타입
status	결과 상태 코드 (정상: 0000, 그 외 에러 코드 참조)	String
order_id	주문 번호	String

 

※ 주문번호를 통해 거래 여부 , 취소 등 진행할 수 있습니다.