環境
Windows10 Home 64bit
Chrome: 81.0.4044.122(Official Build) (64 ビット)
Excel2010 64bit
selenium
取得元HPのスクレイピングをしようとしています。
取得元HP
VBA
1 Dim tableElement As Variant 2 For Each tableElement In driver.FindElementByXPath("//*[@id=""product-detail-wrap""]/div[2]/div/div[3]/div/table").FindElementsByTag("tr") 3 tableRow = tableRow + 1 4 If (tableRow <> 1) Then 5 targetRow = targetRow + 1 6 Debug.Print tableElement.FindElementsByTag("th")(1).Text 7 Debug.Print tableElement.FindElementsByTag("td")(1).Text 8 Debug.Print tableElement.FindElementsByTag("td")(2).Text 9 Debug.Print tableElement.FindElementsByTag("td")(3).Text 10 Debug.Print tableElement.FindElementsByTag("td")(4).Text 11 Debug.Print tableElement.FindElementsByTag("td")(5).Text 12 Debug.Print tableElement.FindElementsByTag("td")(6).Text 13 Debug.Print tableElement.FindElementsByTag("td")(7).Text 14 End If 15 Next tableElement
以下が、実現できなかったので参考にしたページです。
参考HP
driver.FindElementByXPath("//*[@id=""product-detail-wrap""]/div[2]/div/div[3]/div/table").FindElementsByTag("tr")
を参考HPの「tbl.ToExcel [Sheet1]」のようにExcel出力を行うとテーブル値すべてが取得できますが、上記のソースですとtrの2行目までしか取得できません。
ほかの調べ方などが思いつかないため、お手数ですが、ご教示お願い致します。
回答1件
あなたの回答
tips
プレビュー