VBAでIEからソースコードを取得したい 削除
Message#1 2014年10月4日(土)09時52分 From: スクエア |
あるサイトからURLを1万件以上抽出したのですが、こちらに1つ1つアクセスしていき、テキストを抽出しようと考えています。 処理自体は難しくないのですが、数が多すぎますので、どうにか早く抽出できないか考え中です。 私のレベルは一般的にweb表示、データ取得程度でそこまで詳しくありません。 一応基本形として以下で処理できなくはないと思っているのですが、なにかいい方法はありませんでしょうか? よろしくお願いします。 Sub test() Dim objIE As Object Dim strHTML, url As String Dim i As Integer Set objIE = CreateObject("InternetExplorer.application") objIE.Visible = True For i = 1To 10000 url = Cells(i, 1) objIE.Navigate url Call IEWait(objIE) strHTML = objIE.document.body.innerHTML Debug.Print strHTML Next End Sub |
上のメッセージを削除します。
よければパスワードを入力し、削除ボタンをクリックしてください。