VBAでのIE操作・HTML操作について


デルモア  2007-07-31 11:07:40  No: 99243

VBAを独学で学んでいる者です。IEを操作させたく、学んでいます。
色々と検索などをしていましたが行き詰ってしまいました。
どうぞご助力願います。

学び始めて1週間程度ですので、うまく説明できないかもしれませんがご容赦ください。

VBAでIEを操作し、特定のURLを表示。←これは大丈夫です
表示されたウェブサイトのHTML内の特定の文字列(リンク)と、
アクティブなセル内のテキストが合致したリンクをクリックする、
・・・といったマクロは書けるものでしょうか?

<INPUT TYPE="submit" NAME="btn01" VALUE="ログイン">

上記のようなHTMLソースですと「NAME="btn01"」を探せば、「objIE.document.all.btn01.Click」というものでできるかと思いますが、
動的に変化するウェブサイトの文字列と、あらかじめ用意していたセル内の文字列が合致した時にだけクリックするような方法を求めています。

例えば
・夏にしか出現しないウェブサイトコンテンツ「水着」。
・エクセルのシートC2に「水着」。
・IE起動。サイト内に「水着」という文字列があり、セルと合致するので「水着(リンク)」の箇所をクリック。

・・・といった感じなのですが・・・。やはり難しいでしょうか・・・。
「水着」といった単語ではなく、もっと複雑な文字列を扱う予定です。

稚拙な表現ですみません。
皆様、どうぞ宜しくお願いいたします。


あん  2007-07-31 18:11:28  No: 99244

こんにちは(おはょ?)
>VBAでIEを操作し、特定のURLを表示。←これは大丈夫です
この方法はどうしているか教えてください。


デルモア  2007-07-31 21:51:40  No: 99245

あんさん、こんにちは!!

「三流君VBAで・・・」というサイトを参照させていただいております。
http://www.ken3.org/cgi-bin/group/vba_ie.asp

>VBAでIEを操作し、特定のURLを表示。
これは、

Sub ie_test_data_set()

    Dim objIE    As Object 

    Set objIE = CreateObject("InternetExplorer.application") 
    objIE.Visible = True 

    objIE.Navigate "http://指定URL"
    
    Do While objIE.Busy = True
        DoEvents
    Loop
    
End Sub

・・・と記述しています。
宜しくお願い致します。


あん  2007-08-01 02:24:00  No: 99246

たとえば
<INPUT TYPE="submit" NAME="btn01" VALUE="ログイン">
のように
VALUEに水着という文字があったらクリックでいいですか?

じゃないなら
実際のHTMLを教えてください。


※返信する前に利用規約をご確認ください。

※Google reCAPTCHA認証からCloudflare Turnstile認証へ変更しました。






  このエントリーをはてなブックマークに追加