サイト内検索の結果のリンク先を開けてデータ取得したい
昨日以降(0) ２日前以降(0) ３日前以降(0) ４日前以降(0) ５日前以降(0)
| Message#1 2018年5月21日(月)19時16分 From: Kavu3054 | 返事 削除 変更 |
| https://www.bildy.jp というサイトで例えば「マキタ」と検索をかけて、その結果のリンク先を一つずつ開けて、品番と商品名を取得するのを作りたく、紹介されている本を購入し勉強してみました。 サイトを開けて、検索をかけ、表示させることは出来るのですが、その後の検索結果のタグ、id、name。どれを指定して、クリックをしていけば良いのか、わかりません。 Sub title(ByRef objIE As Object, ByRef ws As Worksheet) Dim i, n1, n2 As Long Dim kenmei, url As String Dim objtag As Object Dim objtag2 As Object i = Range("A65536").End(xlUp).Row + 1 For Each objtag In objIE.document.getElementsByTagName("a") If InStr(objtag.outerHTML, "マキタ") > 0 Then objtag.Click i = Range("A65536").End(xlUp).Row + 1 というコードを書くと、画像にもマキタが含まれているため、二度同じことをします。 また、クリックをして、取得して、閉じて、また次の結果をクリックというのがうまく行きません。 ご教授いただけないでしょうか。よろしくおねがいします |
昨日以降 ２日前以降 ３日前以降 ４日前以降 ５日前以降
