|
他の方と同じような質問だったので見落としていました。 yahoo検索結果のURLを取得するには以下を参考にしてください。 一応リスティング広告のURLは省くような設定にしています。 Sub test() Dim objIE As InternetExplorer Call ieView(objIE, "http://www.yahoo.co.jp") Call formText(objIE, "p", "★キーワード★") Call tagClick(objIE, "input", "検索") r=1 For i = 0 To objIE.document.Links.Length - 1 If InStr(objTag.outerHTML, "rd.listing.yahoo.co.jp") = 0 Then Cells(r, 2) = objIE.document.Links(i).href r = r + 1 End If Next End Sub |
↑エクセルVBAのIE(InternetExplorer)操作で分からない事があればこちらの掲示板よりご質問ください^^
ExcelのVBA初心者入門↑こちらはExcelのVBAをマスターできるよう初心者向けのエクセルVBA入門コンテンツになります^^
こちらでは、エクセルVBAで実際に作成したIE(InternetExplorer)制御ツールをまとめています。自動ログインや情報収集など具体的に解説しています。IE(InternetExplorer)制御をされる方は参考にしてください。
こちらでは、これまでに紹介したIE(InternetExplorer)操作で便利な機能をツール化しています。無償でダウンロードできますので、目的に合わせたご利用ください。
こちらでは、IE(InternetExplorer)オブジェクトのメソッド・プロパティをまとめています。
こちらでは、エクセルVBAのIE(InternetExplorer)操作で利用されたVBA関数をまとめています。
こちらでは、エクセルVBAのIE(InternetExplorer)操作で利用されたステートメントをまとめています。ExcelのVBAで基本的な部分になりますので、しっかり理解しましょう。
こちらでは、これまでに作成したIE(InternetExplorer)操作で役立つサブルーチンをまとめています。
全てをコピーする必要はありませんが、目的に合わせたサブルーチンをご利用ください。
こちらでは、IE(InternetExplorer)制御の利用だけでなく、Excel全般で利用できるVBAコードです。エクセルVBAで役に立つものばかりですので、ご利用ください。