엑셀로 웹크롤링하기 셀레늄 설치하기

엑셀로 웹크롤링을 하기위해서는 세가지가 필요합니다. 첫번째는 vba언어를 사용해야하고, 두번째는 웹드라이버를 설치해야합니다. 마지막으로 세번째는 셀레늄이라는 확장프로그램입니다.

 

목차

• 크롬드라이버 설치하기 
• Selenium 패키지 다운로드 (엑셀 웹크롤링에 필요한 프로그램)
  • 설치파일 옮기기
• 엑셀에서 실행해보기

크롬드라이버 설치하기 

1. 크롬 버전 찾기.

내버전은 134버전인것을 확인

빨간선을 보시면, 내 크롬의 버전, 그리고 몇비트를 사용하는지 알수있습니다. 

 

2. 다음 링크에서 크롬 웹드라이버 다운로드 (자신의 크롬 버전와 호환되는 것을 다운로드)

Chrome for Testing availability

134버전의 64비트, 윈도우 버전 다운로드

 

아래와 같이 다운로드된것을 확인!! 일단은 다운로드 된채로 두고 다음으로 넘어갑니다.

다운로드 완료된 크롬드라이버실행파일

 

Selenium 패키지 다운로드 (엑셀 웹크롤링에 필요한 프로그램)

아래링크에서 다운로드, release > git hub > 다운로드 순서대로 하면된다.

다운로드후에 해당 다운로드 파일을 더블클릭하여 설치를 진행한다.

Seleniumbasic

 

아니면 아래 gdrive에서 다운로드 할것.

 

SeleniumBasic-2.0.9.0.zip

 

설치파일 옮기기

이제 다운로드에 필요한 파일은 전부 다운로드 받았습니다.이제 다운로드 받은 파일을 설치해야합니다.

1. SeleniumBasic-2.0.9.0 더블클릭하여 설치

2. chromedrive.exe > 셀레늄설치폴더로 이동
    일반적인 셀레늄의 경로는 다음과 같다 : (C:\Users\USER\AppData\Local\SeleniumBasic) 
    이것은 사람마다 다르니 직접 확인할것

chromedriver.exe 를 Selenium 폴더로 옮기기

---

엑셀에서 실행해보기

1. 엑셀 오픈

2. visual basic for Application open (엑셀 vba 스크립트창)오픈

3. 엑셀 vba 스크립트창 > 도구 > 참조에서 필요한 라이브러리 체크박스 on

    (Selenium Type Libray 만 on 해도됨)

 

3가지 체크중

 

4. 코드를 입력해서 실행이 제대로 되는지 확인할것

 

아래와 같은 코드를 실행하면 구글이 열리는것을 확인할수있다.

F5가 아니라, F8을 누르면 코드가 한줄씩 실행되기때문에, 천천히 확인이 가능하다.

 

'Opening Webpage with Chrome:주석'

Dim bot As New WebDriver
bot.Start "chrome", "https://www.google.com"
bot.Get "/"

 

위를 활용하면, 구글이 아니라 네이버도 열수있다.

 

Sub naverStart()
'네이버 열어보기

Dim bot As New WebDriver
bot.Start "chrome", "https://www.naver.com"
bot.Get "/"

 

아래를 활용하면 네이버에서 검색도 가능하다,

 

Sub naverStart()
'네이버 열어보기

Dim bot As New WebDriver
bot.Start "chrome", "https://www.naver.com"
bot.Get "/"

bot.FindElementById("query").SendKeys "맛있는 치킨"

 

F8을 누르며 한줄씩 코드를 실행하고있음.

---

위와 같이 코드를 실행에 성공했다면 반은성공

 

팁 : 크롬 업데이트 막기 (업데이트하게되면 크롬드라이버 파일을 다시 다운로드 받아야함

 

윈도우 크롬 업데이트 차단, chrome 자동 업데이트 비활성화