Excel VBA (Selenium) で、Webサイトからメールアドレスを取得したい

Question

Excel VBA (Selenium) で、Chromeを操作してWebページからメールアドレスを取得したいと考えています。
例えばこのページ（http://hmcind.com/）のソースを見ると、以下の記述があります。

<a href="mailto:[e-mail]">[e-mail]</a>

<a>タグ内のアドレス（テキスト）ではなく、"mailto:[e-mail]"の部分から
メールアドレス部分のみを取得したいと考えています。
（他のホームページではテキスト部分がメールアドレスとは限らないため）

"mailto:"を目印にするのがよいと考えたのですが、ここで詰まってしまいました。

ご教授いただければ幸いです。

Answer 1

    ' aタグのhref属性にmailto:を含むものを取得
    Set wes = browser.FindElementsByXPath("//a[contains(@href, 'mailto:')]")
    ' 取得結果のhref 属性を出力
    For Each we In wes
        Debug.Print we.Attribute("href")
    Next

こんな感じでしょうか。

Comments

[Acer]

さっそくありがとうございます。こんな要素の探し方があったんですね。勉強になりました。