「innerHTMLは<body>タグ内部のHTML文書をそのままタグつきテキストとして抜き出す処理」
'サンプル3.1_DOMを理解する
Public Sub
useHTMLAsObject()
Dim ie As
InternetExplorer 'IE
Dim htdoc As
HTMLDocument 'HTML
Set ie =
Day2.getIE("Google") 'IE取得
'IEに表示されているHTMLをオブジェクトとして取得
Set htdoc =
ie.Document
'HTMLに含まれるタグが、オブジェクトとして操作できる
MsgBox htdoc.Title
'<title>タグ
MsgBox htdoc.body.innerHTML '<body>タグの内側のHTML
End Sub
※HTMLイメージ
<html>
<head>
<title>タイトル</title>
</head>
<body>
<p>人を呪わば穴二つ</p>
</body>
</html>