ExcelのVBAでHTML内の特定のタグの出現回数を調べたい

質問

たとえばYahoo!JapanのサイトのHTMLのTDタグの出現回数を調べる場合
下記のVBAに何を付け加えればよいのでしょうか？

Sub tagCount()

Dim cnt As Integer
Dim IE As Object
Dim HTML As String

Set IE = CreateObject("InternetExplorer.Application")
IE.Navigate ("http://www.yahoo.co.jp/")
While IE.busy: Wend
While IE.Document.readyState <> "complete": Wend
HTML = IE.Document.body.innerHTML
IE.Quit
'td_count = ここの部分がわかりません。
'文字列の出現回数をカウントする関数はないのでしょうか？
MsgBox td_count
End Sub

ご存知の方がおられましたらご回答をよろしくお願いします。

使用OS：Windows XP
使用ソフト：Microsoft Excel 2003

回答No.1

mitarashi · ベストアンサー

正規表現を用いて検索して、Matchesコレクションの個数を取得すればよいでしょう。
VBA 正規表現
で検索すれば、色々と情報が得られます。

参考URL：

http://codezine.jp/a/article/aid/1655.aspx

お礼

参考URLの内容を見て問題を解決することができました。
ご回答いただきどうもありがとうございました。