Excel VBA で chrome で 検索して表示されている 項目名を 取得したい

Question

VBA ＋　Selenium Basic　で　Google 検索したときに　１ページに表示される　検索結果（項目目）　を　取得したいのですが、下のプログラム　で　実行したときに
「a(i) = .FindElementByClass("LC20lb").Text」の部分で　エラーになります。

どなたか　解決方法をご教授ください。

よろしくお願いします。

エラーは次の内容です。
実行時エラー　７：
NoSuchElementError
Element not found for Class=LC20lb

Dim driver As New ChromeDriver
Dim a As Variant

Sub Main()
driver.Get ("https://www.google.com")

'テスト用語「A」
driver.FindElementByName("q").SendKeys ("A")
driver.Wait 500
driver.FindElementByName("btnK").Click

count = driver.FindElementsByClass("LC20lb").count
For i = 1 To count
    With driver.FindElementsByClass("LC20lb")(i)
    a(i) = .FindElementByClass("LC20lb").Text
    End With  
Next i
' ブラウザを閉じる.
driver.Quit

End Sub

Comments

[ExcelVBAer]

問題の切り分けが必要です。
.FindElementByClass("LC20lb")　がエラーになるのか、
.Text　がエラーになるのか

Answer 1

for 文の直前の行にbreak pointを設定してマクロを起動し、break pointで停止したらdriverという変数をウォッチ式に入れると構造が見えるはずです。
そこに
driver.FindElementsByClass("LC20lb")(i).FindElementByClass("LC20lb").Text
がないからエラーになっています。
あなたがアクセスしたい変数が何かはエスパーじゃないので分かりません。

Comments

[akane2000]

sage様
ありがとうございます。

お怒りなさらずご教授下さい。

sage様みたいに全てがわかってませんので、
すみません。

htmlをもう少し理解しないと出来ないのかもしれません。

LC20lb という　クラスの　テキスト文を　取得したいだけです。。。

Answer 2

ChromeDriver型という型定義を使っているようですね。

この定義にない要素を指定したからエラーになったようです。

with文の機能を理解していますか?
(誤解があるように見えます)

Comments

[akane2000]

sage様

ありがとうございます。

試行錯誤しております。
是非具体的な解決法をご教授下さい。
vba+selenium
の　詳しい方

よろしくお願いします。