[vba] VBA selenium 기본 코드

[vba] VBA selenium 기본 코드

 

기본 셀레니움 틀

Sub 함수명()
    Dim driver As New Selenium.ChromeDriver
    Dim keys As New Selenium.keys
    
    driver.Get "웹주소"
    //작업할 코드
End Sub

 

셀레니움 기본 코드

driver.FindElementByCss("셀렉터").Clear //지우기
driver.FindElementByCss("셀렉터").text //텍스트 가져오기


Dim keys As New Selenium.keys //셀레니움.keys 삽입
driver.FindElementByCss("셀렉터").SendKeys "키워드" //키워드 텍스트 입력
driver.FindElementByCss("셀렉터").SendKeys keys.Enter //엔터치기

driver.FindElementByCss("셀렉터").click //클릭하기
driver.FindElementByCss("셀렉터").Attribute("href") //<a> 태그 안 링크 가져오기

 

스크롤

//전체창 스크롤
driver.ExecuteScript "window.scrollTo(0,999999)" //스크롤 주기
driver.Wait 1000 //스크롤 후 1초 wait

//부분 스크롤
driver.ExecuteScript "document.querySelector("스크롤이 있는 공간 셀렉터").scrollTo(0,999999)"

 

alert, confirm창 닫기

'확인'
driver.SwitchToAlert.Accept
'cancel'
driver.SwitchToAlert.Dismiss

 

iframe 다루기

'iframe 코드 다루기'
driver.SwitchToFrame driver.FindElementByCss("#iframeResult")
driver.FindElementByCss("셀렉터").Click

'iframe 코드 나오기'
driver.SwitchToDefaultContent
driver.FindElementByCss("셀렉터").Click

 

새탭 다루기

driver.Windows(2).Activate //두번째 탭 또는 두번째 오픈된 새창 제어
driver.FindElementByCss("셀렉터").Click

driver.Windows(1).Activate //첫번째 탭 제어
driver.FindElementByCss("셀렉터").Click