Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


1981 / 13645 ツリー ←次へ | 前へ→

【70674】gifボタンを押す よし 11/12/16(金) 1:10 質問[未読]
【70675】Re:gifボタンを押す かみちゃん 11/12/16(金) 5:59 発言[未読]
【70676】Re:gifボタンを押す よし 11/12/16(金) 9:06 お礼[未読]

【70674】gifボタンを押す
質問  よし  - 11/12/16(金) 1:10 -

引用なし
パスワード
   よろしくお願いします。

ie制御の話です。

nameやValueの無い下記のソースのボタンを押すことは出来るのでしょうか?

<img id="sousinImg" src="./images/b_check.gif" onclick="clickConfirmBtn()" onmouseenter="buttonChageAlpha1(this, 1)" onmouseleave="buttonChageAlpha1(this, 2)" style="cursor:hand;filter:Alpha(opacity=50);">

【70675】Re:gifボタンを押す
発言  かみちゃん E-MAIL  - 11/12/16(金) 5:59 -

引用なし
パスワード
   こんにちは。かみちゃん です。

>nameやValueの無い下記のソースのボタンを押すことは出来るのでしょうか?
>
><img id="sousinImg" src="./images/b_check.gif" onclick="clickConfirmBtn()" onmouseenter="buttonChageAlpha1(this, 1)" onmouseleave="buttonChageAlpha1(this, 2)" style="cursor:hand;filter:Alpha(opacity=50);">

以下のような方法ではできませんか?

For Each objImage In objIE.Document.getElementsByTagName("IMG")
 If objImage.id = "sousinImg" Then
  objImage.Click
  Exit For
 End If
Next

なお、以下なども参考になるかと思います。
http://vbaie.blog111.fc2.com/blog-entry-12.html

【70676】Re:gifボタンを押す
お礼  よし  - 11/12/16(金) 9:06 -

引用なし
パスワード
   動きました〜!!!!ありがとうございます!!
ずっと悩んでいたので凄く嬉しいです!

1981 / 13645 ツリー ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free