엑셀 주식 차트 만들기 | 네이버 금융 실시간 정보 조회

엑셀 주식 차트 만들기 | 네이버 금융 실시간 정보 조회

엑셀 주식 차트 만들기 목차 바로가기

영상 강의

예제파일 다운로드

오빠두엑셀의 모든 강의 예제파일은 회원 여러분께 무료로 제공됩니다.

이번 강의에서는 아래 2가지 사용자 추가기능 함수가 사용되었습니다.

각 함수에 대한 자세한 사용법은 관련 링크를 참고해주세요. 위 2가지 함수와 더불어 네이버 증권에서 제공하는 다양한 주식정보를 실시간으로 조회할 수 있는 NaverFinanceSearch 함수를 사용하면 주식 분석을 보다 편리하게 할 수 있습니다.

예제파일을 다운받으면 기존에 추가되어 있는 데이터를 기준으로 5일, 20일, 60일 이동평균선을 추가하겠습니다. 이동평균선은 AVERAGE 함수를 이용하여 손쉽게 추가할 수 있습니다.

엑셀 주식 차트는 2010 이후 버전 사용자라면 아주 손쉽게 만들 수 있습니다. 다만 주식차트를 만들려면 아래 차트에 사용되는 데이터가 아래 2가지 조건을 만족해야 합니다.

• 데이터의 첫번째 열은 반드시 '날짜'로 이루어져야 합니다.
• 주식차트에서 요구하는 데이터의 순서대로 항목을 입력해야 합니다. 주식차트로 만들 수 있는 데이터 항목순서는 총 4가지입니다.
  a. 고가-저가-종가
  b. 시가-고가-저가-종가
  c. 거래량-고가-저가-종가
  d. 거래량-시가-고가-저가-종가

예제파일에 기존 추가되어있는 데이터를 바탕으로 주식차트를 제작해보겠습니다.

NaverFinanceHistroy 함수를 사용하여 특정 종목의 주식정보를 실시간으로 받아올 경우, 매번 차트 세로축의 최소값/최대값을 변경하기 어려울 수 있습니다. 그럴 경우 아래 명령문을 엑셀 파일에 추가하면 세로축의 최소/최대값이 자동으로 변경됩니다.

아래 명령문을 사용하는 방법은 영상강의 21:20 부터 자세히 설명해드렸습니다.

Sub UpdateChart()
 
On Error Resume Next
 
Dim WS As Worksheet
Dim Cht As ChartObject
Dim i As Long: Dim cEnd As Long: Dim cVol As Long
Dim pMax As Double: Dim pMin As Double: Dim vMax As Double: pMin = 1000000000
Dim sEnd As String: sEnd = "F:F"   '<- 종가가 입력된 열을 입력하세요.
Dim sVolume As String: sVolume = "G:G"   '<- 거래량이 입력된 열을 입력하세요.
 
Set WS = ActiveSheet
Set Cht = WS.ChartObjects(1)
 
WS.Calculate
 
cEnd = WS.Range(sEnd).Column
cVol = WS.Range(sVolume).Column
 
For i = 1 To WS.UsedRange.Row + WS.UsedRange.Rows.Count - 1
    If WS.Cells(i, cEnd) > pMax And IsNumeric(WS.Cells(i, cEnd)) And WS.Cells(i, cEnd) <> "" Then pMax = WS.Cells(i, cEnd)
    If WS.Cells(i, cEnd) < pMin And IsNumeric(WS.Cells(i, cEnd)) And WS.Cells(i, cEnd) <> "" Then pMin = WS.Cells(i, cEnd)
    If WS.Cells(i, cVol) > vMax And IsNumeric(WS.Cells(i, cVol)) And WS.Cells(i, cVol) <> "" Then vMax = WS.Cells(i, cVol)
Next
 
Cht.Chart.Axes(xlValue).MaximumScale = pMax * 1.1
Cht.Chart.Axes(xlValue).MinimumScale = pMin * 0.7
Cht.Chart.Axes(xlValue, xlSecondary).MinimumScale = 0
Cht.Chart.Axes(xlValue, xlSecondary).MaximumScale = vMax * 2.5
 
Application.Calculation = xlCalculationManual
 
End Sub

엑셀 NaverFiananceHistory 함수는 네이버 증권에서 제공하는 주식정보를 실시간으로 받아오는 함수입니다. 따라서 계산방식을 자동으로 설정한 상태에서 많은 양의 데이터를 받아올 경우, 주식 정보와는 전혀 연관없는 다른 셀을 변경할 때에도 인터넷에 접속하여 값을 받아오게 되므로 처리속도가 느려지는 문제가 발생할 수 있습니다.

뿐만 아니라, 불필요한 많은 양의 데이터를 지속적으로 요청할 경우, Naver 측에서도 불필요한 리소스를 사용하게 되는 문제가 발생할 수 있습니다.

따라서, NaverFinanceHistory 함수를 사용하여 주식정보를 실시간으로 받아온다면, 엑셀 환경설정에서 계산 방식을 '수동'으로 변경한 뒤, 필요할 때만 값을 갱신하는 방법으로 사용하는 것을 권장드립니다.