반응형
API Reference
HTTP Method | API URL |
GET | https://api.upbit.com/v1/candles/minutes/unit |
PATH PARAMS
필드명 | 필수 여부 | 설명 | 타입 |
unit | Y | 분 단위. 가능한 값 : 1, 3, 5, 15, 10, 30, 60, 240 | Integer |
QUERY PARAMS
필드명 | 필수 여부 | 설명 | 타입 |
market | Y | 마켓 코드 (ex. KRW-BTC, BTC-BCC) | String |
to | N |
마지막 캔들 시각 (exclusive). 포맷 : yyyy-MM-dd'T'HH:mm:ssXXX or yyyy-MM-dd HH:mm:ss. 비워서 요청시 가장 최근 캔들 |
String |
count | N | 캔들 개수(최대 200개까지 요청 가능) | Integer |
Response
필드명 | 설명 | 타입 |
market | 마켓명 | String |
candle_date_time_utc | 캔들 기준 시각(UTC 기준) | String |
candle_date_time_kst | 캔들 기준 시각(KST 기준) | String |
opening_price | 시가 | Double |
high_price | 고가 | Double |
low_price | 저가 | Double |
trade_price | 종가 | Double |
timestamp | 해당 캔들에서 마지막 틱이 저장된 시각 | Long |
candle_acc_trade_price | 누적 거래 금액 | Double |
candle_acc_trade_volume | 누적 거래량 | Double |
unit | 분 단위(유닛) | Integer |
VBA Code
Sub Upbit_Candles_Minutes()
Dim WinHttp As New WinHttp.WinHttpRequest
Dim url As String, unit As Integer, market As String, toDate As String, count As Integer
url = "https://api.upbit.com/v1/candles/minutes/"
unit = 1
market = "KRW-BTC"
toDate = Format(Now, "YYYY-MM-DD HH:MM:SS")
count = 200
With WinHttp
.Open "GET", url & unit & "?market=" & market & "&to=" & toDate & "&count=" & count
.SetRequestHeader "user-agent", "Mozilla/5.0 (Windows NT 10.0; Win64; x64; rv:60.0) Gecko/20100101 Firefox/60.0"
.Send
.WaitForResponse
Debug.Print .ResponseText
End With
Set WinHttp = Nothing
End Sub
Download
업비트 OPEN API
Upbit Open API v1.0.6
반응형
'VBA > Code' 카테고리의 다른 글
[VBA] 업비트 Open API>시세 체결 조회>당일 체결 내역 (0) | 2019.09.09 |
---|---|
[VBA] 업비트 Open API>시세 캔들 조회>월(Month) 캔들 (1) | 2019.09.09 |
[VBA] 업비트 Open API>시세 캔들 조회>주(Week) 캔들 (0) | 2019.09.09 |
[VBA] 업비트 Open API>시세 캔들 조회>일(Day) 캔들 (2) | 2019.09.09 |
[VBA] 업비트 Open API>시세 종목 조회>마켓 코드 조회 (0) | 2019.09.09 |