VBAからIEを利用する

VBAからIEを呼び出すことで、指定したウェブページの「文字列のみ」または「HTMLコード」を読み出すことができます。 

文字列のみ

Sub GetInnerText()
　Dim ie As Object
　Dim url As String
　Dim bodyText As Variant

　Set ie = CreateObject("InternetExplorer.Application")
　url = "http://www.yahoo.co.jp"
　ie.Navigate url
　Do While ie.Busy = True
　　DoEvents
　Loop
　Do While myIE.document.ReadyState <> "complete"
   DoEvents
　Loop

　bodyText = ie.Document.Body.InnerText
　ie.Quit
　Set ie = Nothing
End Sub

一行ずつ解説します。

 

 

 

 

 

 

---