使用例 - 24000/ChromeControler-No-Selenium-WebDriver-VBAJSON GitHub Wiki

コード内で以下の変数宣言、代入を行う

Dim 変数名 as IWebDriver  
Set 変数名 = new ChromeDriver



'または



Dim 変数名 as IWebDriver  
Set 変数名 = new EdgeDriver

使用例

Dim chrome as IWebDriver  
Set chrome = new ChromeDriver

'URLを開く(readystate=Completeまで自動で待つのでタイミング調整不要）
chrome.OpenURL("url")

'FindElementByXpathで要素を取得(WebElementが戻ってくる)
'そのWebElemntのメソッドを使用し、要素を操作
chrome.FindElementByXpath("xpath").Click

'WebElementを変数に代入したい場合、
'IWebElementで変数宣言を行い、FindElementBy～を行う
Dim elem as IWebElemnt
set elem = chrome.FindElementByXpath("xpath")

'FindElementsByTagで要素コレクションを取得(WebElementsが戻ってくる)
'そのコレクションの中からインデックスでWebElementを取得し、メソッドを使用し要素を操作
chrome.FindElementsByTag("tagName")(0).Click

'WebElementsを変数に代入したい場合、
'IWebElementsで変数宣言を行い、FindElementsBy～を行う
Dim elems as IWebElemnts
set elems = chrome.FindElementsByTag("tagName")
elems(0).click
⚠️ **GitHub.com Fallback** ⚠️