[Excel] 네이버 웹데이터 가져오기 및 자동 업데이터 방법

웹데이터 가져오는 기본 방법은 아래와 같다. 

jlim0316.tistory.com/259

---

1. 네이버 국내증시 기관순매수 웹데이터 가져오기

네이버에서 "국내증시"를 검색하고 아래 사이트에서 기관 순매수 데이터를 엑셀에 담아보고자 한다.

이때, 내가 새로고침을 굳이 하지 않더라도 일정 간격을 가지고 알아서 자동 업데이트 되도록 만들고자 한다.

 

기관 순매수 데이터를 가져오고자 한다.

사이트 긁어서 엑셀 내 데이터> 데이터가져오기> 기타원본에서> 웹> 사이트 입력> 로드

---

2. 모듈 삽입

데이터를 로드해주고 나서 vba프로젝트에 모듈을 만들어준다.

비주얼 베이직 에디터를 열기 위해선

1) 파일>옵션>리본 사용자지정> 개발도구 체크 

혹은

2) Alt + F11 을 눌러준다.

 

Alt + F11

---

3. 코드 삽입

Public Schedule As Date
 
 
Sub RefreshAllData()
   ThisWorkbook.RefreshAll
   Call AutoRefresh
End Sub
Sub AutoRefresh()
   Schedule = Now + TimeSerial(0, 0, 30) 'hr min sec'
   
   Application.OnTime Schedule, "RefreshAllData"
End Sub
 

4. 파일 저장 .xlsm

반드시 저장은 .xlsm으로 해야함