VBA IE操作、指定したボタンのクリック
未読分:3件
昨日以降(0) 2日前以降(0) 3日前以降(0) 4日前以降(0) 5日前以降(0)
近田 伸矢, 植木 悠二, 上田 寛
IEのデータ収集&自動操作のプログラミング本はこの1冊だけ!IEの起動やポップアップウィンドウ、表示を制御する基本的なコードはもちろん、テキストボックスやラジオボタン、表、ハイパーリンクなどのHTML部品を制御する方法など、自動操作に欠かせないノウハウを丁寧に解説。
Message#3 2015年1月21日(水)20時01分 From: VBAマスター | 返事 削除 変更 |
ログインボタンはaタグなんですね。 submitとか使うことができますが、以下の方法がどのタグにも対応した クリックなので一番楽っぽいです。 http://www.vba-ie.net/form/subroutine-tagclick.html |
Message#2 2015年1月21日(水)20時00分 From: ダメダメ | 返事 削除 変更 |
<dd class="login"><a href="javascript:void(0);" onClick="javascript:func_request_Link('LOGIN'); return false;"><img src="https://bmypage.kuronekoyamato.co.jp/bmypage/script/images/header_contents_login_btn.gif" alt="ログイン" title="ログイン" class="imgover" /></a></dd> ちゃんとtitle="ログイン"と名前がついていますよ |
Message#1 2015年1月21日(水)19時41分 From: デビュープラス | 返事 削除 変更 |
具体的には、ヤマト運輸のビジネスメンバーズのHPです。 https://bmypage.kuronekoyamato.co.jp/bmypage/servlet/jp.co.kuronekoyamato.wur.hmp.servlet.user.HMPLGI0010JspServlet 以下のコードで、それぞれのボックス(IDやパスワードなど)を入れることができました。 D3〜D6セルに IDなどログインに必要な情報をいれてあります。 しかし、その下部分にある ログイン のボタンをクリックする方法が見つからず困っています。 Sub ボタン1_Click() Dim objIE As Object Set objIE = CreateObject("InternetExplorer.Application") objIE.Navigate Range("D3").Value objIE.Visible = True Do Until objIE.Busy = False DoEvents Loop objIE.Document.frm.CSTMR_CD.Value = Left(Range("D4").Value, 12) objIE.Document.frm.CSTMR_CLS_CD.Value = Right(Range("D4").Value, 3) objIE.Document.frm.LOGIN_USER_ID.Value = Range("D5").Value objIE.Document.frm.CSTMR_PSWD.Value = Range("D6").Value objIE.Document.frm.???.Click End Sub ログインのボタンに特に名前の指定がないようなのですが、この場合に ボタンをクリックする方法をご存知の方、ご指導ください。 |
昨日以降 2日前以降 3日前以降 4日前以降 5日前以降