• 締切済み

VBAでWebBrowserを使用していますが、gifイメージの部分だけ自動的にクリックするようにできません。

宜しくお願い致します。 同じような内容を他でも質問させていただいておりますが、 より具体的な内容を記述・質問させていただけたらと思います。 VBAでWebBrowserを使用していますが、gifイメージの部分だけ自動的にクリックするようにできません。と言うことですが、コード的には以下のようになります。 <TD valign="bottom"><INPUT type="image" src="/static/image/bt_next.gif" width="62" height="25" border="0" alt="次へ"></TD> 不要な部分もありますが、本当に情報の少ないボタンで作られています。 カーソルをボタンの上に持って行った時に普通でしたら、画面下にリンク先が表示されたりするのですが、それも一切なく、裏でどのように制御されているのか全く見当が付かない状態です。 手動ではなんら問題なくクリックして動作してますので、上記の情報からだけでもVBAで自動的にクリックということも可能では・・・と素人ながら考えております。 何か方法をご存知の方がおられましたら、是非とも御教授いただけたらと思います。 何卒宜しくお願い致します。

みんなの回答

  • todo36
  • ベストアンサー率58% (728/1234)
回答No.1

名無しの<INPUT>でも番号をしてすれば取れるとはずです。 document.forms(0).elements(3)

全文を見る
すると、全ての回答が全文表示されます。

関連するQ&A

  • VBA IE操作 自動ログイン

    とある証券会社(M証券)へ自動ログインを試みています。 他の証券会社は ObjIE.Document.all.pinNo.Value = PW というように URLのソースから「name」を探してその値を代入していました。 上記の場合は ・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・ <TD bgcolor="#E6DBAC" align="center" nowrap> <B>取引暗証番号</B><BR><A href="Javascript:void('0');" onClick="Javascript:openKeyBoard('secKey', 'pinNo');"> <img src="/static/image/kidou.gif" id="secKeyButton" width="150" height="18" border="0"> </A><DIV style="position:absolute" align="center"> <DIV id="secKey"></DIV></DIV></TD> <TD bgcolor="#FFFFFF"> <INPUT maxlength="16" size="17" name="pinNo" id="pinNo" value="" type="password"> </TD> ・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・ から探し出せました。 しかし「次へ」ボタンを押してログインしたいのですが ソースが ・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・ <TD valign="bottom"> <INPUT type="image" src="/static/image/bt_next.gif" width="62" height="25" border="0" alt="次へ"> </TD> <TD valign="bottom"> <A href="/ITS/login/Logout.jsp;jgiwww12=LnXfcXFz3CLVrmMjKDrMB1510mwwHx2w9JT82WQ2fXLQ8nZMs0Gg" onClick="return linkCheck()" target="_top"> <IMG src="/static/image/bt_cyushi.gif" alt="中止" width="62" height="25" border="0"></A></TD> ・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・・ しかなく、nameが見当たりません。 この場合は、どのようにしてログインすればいいのでしょうか? ご教授よろしくお願い致します。

  • VBAによるIE操作でgifをクリックする方法

    ボタンに書かれているソースは <!--▼ボタン---------------------------------------------------> <table width="800" border="0" cellspacing="0" cellpadding="0"> <tr> <td align="right" width="108"><input type="image" img src="http://www.aaaaa.co.jp/be/fli/image/bt_search.gif" width="108" height="19" border="0"></td> </tr> </table> <!--▲ボタン---------------------------------------> と言った感じです。nameも無く、altも分からず、どうクリックしたらいいでしょうか。 『objIE.Document.Links(i).Click』というのもダメでした。

  • VB2005のWebBrowserで”クリック”する

    VB2005のWebBrowserを使い、楽天ブログをランダムボタンを自動で押して、ペラペラめくっていきたいと思い、下記プログラムを組みました。 しかし、実際実行すると、プログラムが強制終了。「問題が発生したため、○○.exe(プログラム名) を終了します。 ご不便をおかけして申し訳ありません。」 となってしまいます。 原因、解決策、もしくは代案を教えていただきたいです。 よろしくお願いいたします。 プログラム '楽天ブログの自分のページにアクセス WebBrowser1.Navigate("http://plaza.rakuten.co.jp/○○○○○") 'ランダムボタン(右上のボタン)をクリック WebBrowser1.Document.GetElementsByTagName("a").Item("ランダム").InvokeMember("click")

  • mechanizeでimageをclick

    perlのmechanizeを使い、form内の、nameパラメータの無いimageボタンをクリックし、ページを遷移させようとしているのですが、方法がわかりません。下記ソースの「alt="スイッチ2"」のgifをクリックしようとしています。方法お分かりの方、お手数おかけして申し訳ありませんが、ご教授お願いできますでしょうか? ■■ツールバージョン   perl: v5.14.4   Mechanize :1.74 ■■対象のformを含むhtmlソース■■ <form name="second_step" method="get" action="a_link.cgi"><input type="hidden" name="CCC" value="愛"> <table width="950" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="26"><img src="img/t.gif" alt="" width="26" height="10"></td> <td> <table width="897" border="0" cellpadding="0" cellspacing="1" bgcolor="#cecece"> <tr> <td><table width="100%" border="0" cellpadding="8" cellspacing="0" bgcolor="#FFFBE0"> <tr> <td><font size="-1"> <textarea name="html_source" cols="105" rows="4" style="width:100%;" class="html_source"> </textarea> </font></td> </tr> </table></td> </tr> </table></td> </tr> </table> <div><img src="img/t.gif" alt="" width="10" height="10"></div> <table width="924" border="0" cellspacing="15" cellpadding="0"> <tr> <td width="447" align="right"><input type="image" src="img/af_shohin_05bt01.gif" alt="スイッチ1" class="select_source"></td> <td width="180"><input name="" type="image" src="img/af_shohin_05bt02.gif" alt="スイッチ2" class="post_blog"></td> <td width="252" align="right"><a href="a_link.cgi?CCC=https://www.google.co.jp/" target="_blank" class="post_twitter_2"><img width="154" height="33" alt="twitterで紹介" src="img/affili_cp_twitter_btn02.jpg" border="0"></a></td> </tr> </table> </form>

  • HTMLのimageをクリックする方法

    どうか教えてください。 エクセルVBAからあるHPの画像をクリックしたいのですが やり方が分かりません。 HTML------------------ <input type="image" name="button" src="XX.gif" value="ログイン" alt="ログイン" /> ---------------------- 上記のHTMLなのですが、これをクリックしようと下記のVBAを書きました。 objIE.document.forms(0).elements(3).Click ここでは、forms、elementsの番号はどうでもいいとして、上記のHTMLで書かれたボタンをどうやって押すかご教示いただけますでしょうか。 不足情報あればご指摘ください。 エクセル2003

  • 同じ<table align="center">を用いていますが、セルの中身の行揃えが代わってしまいます。

    どちらも<table align="center">を用いています。 ですが、タグ1は特にセルの位置を指定せずとも、セルの中身が自動的に左詰めになりますが タグ2のセルの中身は、中央ぞろえになってしまいます。 タグ1のように、<table align="center">を用い、セルを左詰め指定(<align="left">)をせずとも なぜセルの中身が左詰めになるのか分かりません。。。 -------------タグ1------------- <table width="600" border="0" align="center" cellpadding="0" cellspacing="5"> <tr> <td width="10"><img src="img/concept_title.gif" width="10" height="30"></td> <td><img src="img/concept_title01.gif" alt="テキスト" width="127" height="16"></td> </tr> <tr> <td width="10">&nbsp;</td> <td class="t01">テキスト</td> </tr> </table> ------------------------------ -------------タグ2------------- <table width="640" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td width="3" rowspan="2" valign="top"><img src="image/grade_line.gif" width="3" height="177" /></td> <td width="8" valign="bottom"><img src="image/grade_line30.gif" width="20" height="2" /></td> <td width="368"><img src="image/kisyo/01t.gif" width="368" height="32" /></td> <td align="left" valign="bottom"><img src="image/grade_line_right.gif" width="42" height="2" /></td> </tr> <tr> <td>&nbsp;</td> <td height="145" align="left">テキスト <td rowspan="2"><img src="image/kisyo/01_ph.jpg" alt="井戸" width="200" height="139" /></td> </tr> <tr> <td valign="top"><img src="image/grade_line_bottom02.gif" /></td> <td>&nbsp;</td> <td>&nbsp;</td> </tr> </table> ------------------------------ 初心者的な質問・タグで恐れ入りますが、ご助力頂けますと幸いです。 宜しくお願い致します。

    • ベストアンサー
    • HTML
  • VBA・WebBrowserコントロールで全て自動の話ですが、ボタンをクリック→ページ移動→テキストボックスに入力ができません。

    宜しくお願い致します。 WebBrowserコントロールで表示されたページのボタンをクリック(自動)→ページ移動後→テキストボックスに自動で入力ができません。 コードはこのように書いています。 .Document.all.****.Click Do While .ReadyState <> 4: DoEvents: Loop .Document.all.********.Value = "*****" 以前はIEの表示タイミングとテキストボックスへの入力のタイミングがズレている為にエラーが発生してしまうと思っていましたが、“sleep”などを使って試した結果、仮説がハズレている事が分かりました。 ステップインで調べていくと“ボタンクリック”の後“Do~Loop”のところで停止してしまい“F8キー”を何度押してもそのままの状態で、コード部分をクリックしたり、表示されている“IE”の部分をクリックした後に再度“F8キー”を押すと続いて処理が行われる形となっています。 現状では“フォーカス”の関連かとも思ったのですが、見当が付かない状態です。 何かご存知の方がおられましたら、アドバイスをお願いできたらと思っております。 是非、宜しくお願い致します。

  • IE セル間に隙間が・・・

    HTML初心者です。 テーブルでHPをレイアウトしたいのですが、--1と--3のセル間に微妙な隙間ができてしまいます。NNでは問題なく表示されます。通常どの様なことが原因するのでしょうか?よろしくお願いいたします。 <td width="396" height="234"valign="top"><table width="100%" height="234" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="180" rowspan="2" valign="bottom" >1 <img src="../image/***" width="180" height="180" align="bottom"></td> ------1 <td width="216" height="98" valign="bottom">***</td> </tr> <tr> <td height="136" valign="bottom" ><img src="../image/*** width="91" height="61" border="1"><br>></td> </tr> </table></td> <td width="10" rowspan="3" valign="top"><table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr> <td height="262"></td>        ------3 <td valign="top" >*** <br> </td>

    • ベストアンサー
    • HTML
  • webbrowserでクリック(リンク)させたいのですが・・・

    Webbrowserを使用して、IEを動かしたいです。 下のようなページで”いいいい”(一番下)をリンクさせたいのですがうまくいきません。 どこが悪いのか教えて頂けないでしょうか? ※投稿文字数に制限があり大幅に削除しました。これで分かるでしょうか? <td align="right"> <a href="/bsite/member/menu.do">トップ</a>&nbsp;<b><font color="#999999">│</font></b>&nbsp;<a href="/bsite/member/logout.do">ログアウト</a> <a href="/bsite/price/search.do" class="wlink"><div style="margin:2 0 1 0;">紹介</div></a> <a href="/bsite/member/portfolio/registeredStockList.do" class="wlink"><div style="margin:2 0 1 0;">名前</div></a> <a href="/bsite/member/acc/menu.do" class="wlink"><div style="margin:2 0 1 0;">甲</div></a> <a href="/bsite/market/menu.do" class="wlink"><div style="margin:2 0 1 0;">情</div></a> <div class="titletext">報</div> <!--▼xxxxー--> <table border="0"> <tr valign="top"> <td><b>1111&nbsp;てつ</b></td> <form action="/bsite/member/portfolio/stockDetail.do" method="POST"> <input type="hidden" name="product_code" value="1111"><input type="submit" value="のぼる"> <form action="/bsite/price/stockDetail.do" method="POST"> <input type="hidden" name="atime" value="1225641591930"> <input type="hidden" name="ipm_product_code" value="0000"> <input type="hidden" name="market" value="TKY"> た*&nbsp;<a href="/bsite/price/stockDetail.do?ipm_product_code=5423&market=JNX">PTS</a>&nbsp;&nbsp;&nbsp;<input type="submit" value="あたらしい"> </table> <!--▲登ー--> <table border="0"> <tr valign="top"> <td nowrap><font class="ltext"></td> </tr> </table> <table border="0" "> <tr bgcolor="#b7b7b7">></td></tr> <tr valign="top"> <td nowrap bgcolor=" <td nowrap align=" <tr bgcolor="#b7b7b7"><td colspan="4"><img src="/bsite/img/trans.gif" width="1" height="1" alt=""></td></tr> </table>         <br> <!--▼き--> <table <tr><td bgcolor= <table <tr><td <table "> <tr align="center"> <td 奇数</td> </tr> </table> </table> </td></tr> </table> <br> <!--参考--> <!-- kim --> <table > <tr><td > <table > </table> </td></tr> </table> <br> <!--▲き--> <table border=> <td bgcolor="#eeeeee"> <a href="/bsite/price/marginDetail.do?ipm_product_code=5423&market=TKY" class="wlink">情</a> </td> </tr> </table> <table "></table> <table border="0" cellspacing="0" cellpadding="0" width="100%"> <a href="/bsite/member/stock/buyOrderEntry.do?ipm_product_code=5423" class="wlink">現か</a> </td> <td width="1%"><img src="/bsite/img/trans.gif" width="1" height="1" border="0"></td> <td width="49%" bgcolor="#DEECFA"> <a href="/bsite/member/stock/sellOrderEntry.do?ipm_product_code=5423" class="wlink">なかう</a> </td> </tr> </table> <table border="0" cellspacing="0" cellpadding="0" width="100%" style="margin-top:4px;"> <tr align="center"> <td width="30%" bgcolor="#FFE6D7"> <a href="/bsite/member/margin/buyOrderEntry.do?ipm_product_code=5423" class="wlink">いいいい</a> </td> 自分の考えでは↓なのですが・・・ どなたか教えてください。宜しくお願い致します。 kchk2 = UserForm3.web1.Document.Links(10).innerText If kchk2 <> "いいいい" Then MsgBox "ハイパーリンク「いいいい」の選択に失敗しました。" Exit Sub End If enchk = 0 UserForm3.web1.Document.Links(10).Click

  • WebBrowserでGmailに自動ログイン

    Excel2002VBAにて、WebBrowserでGmailに自動ログインするコードを書いたのですが 実行してGmailにログインはできるのですが、添付画像のダイアログが出てきてしまいます。 はいを押してもいいえを押しても、消した瞬間にすぐに出てきて困っています。 同じような現象の方はいませんでしょうか? またこのエラーの回避の仕方はどうしたら良いでしょうか? ログイン後の画面では何か処理をするようなコードは書いていません。 ちなみにログインするまでのコードは以下です。 Private Sub WebBrowser1_Documentcomplete(ByVal pDisp As Object, URL As Variant) 'Yahooメールなどにログインする処理 ElseIf i = 4 And URL = "https://www.google.com/accounts/Login?hl=ja&cont … Then i = i + 1 WebBrowser1.Document.getElementsByName("Email")(0).Value = "メールアドレス" WebBrowser1.Document.getElementsByName("Passwd")(0).Value = "パスワード" WebBrowser1.Document.getElementsByName("signIn")(0).Click End Sub よろしくお願いします。