• 締切済み

VBAでIEの操作をするうえで

VBAでIEの操作中、webページからのメッセージが表示されるのですが このメッセージをOKする操作方法を教えてください。 ネットでいろいろと調べましたが、うまくできません。 操作に関係あると思われるソースは下記です。 <td colspan=2 class=xl888205><input name='WriteSheet=KanRegist2;Set_R7C1=1;Set_R9C26=-1;' type='SUBMIT' style='width:100%;font-Weight:bold;' OnClick="if(confirm('作業の登録を行います。よろしいですか?')!=true){return false;} if(DtmErrCheck(2)!=true){return false;}" value='登録'></td> 下記マクロで登録ボタンを押すと 作業の登録を行います。よろしいですか? のメッセージが表示されます。これをクリックしたいです。 For Each Obj In objIE.document.all.tags("INPUT") '登録 If Obj.Value = "登録" Then '.value値(ボタンの名称) Obj.Click '.Click Exit For 'ループを抜ける End If Next よろしくお願いします。

みんなの回答

noname#233986
noname#233986
回答No.2

ごめんなさい 1の回答は間違ってると思う。 DOM操作だから。 ページが全部ロードするまで、5秒ぐらい待つコードを入れるとか、 ごめんなさい!

yyrd0421
質問者

お礼

返信が遅くなってしまい申し訳ありません。 試してみましたがダメでした。 ご回答ありがとうございます。

noname#233986
noname#233986
回答No.1

sendkeysだったかな、でENTERを押せばいいです。 でもメッセージが表示されないと、ENTER押してもなんにもならんから 数秒待たないといけないかも。 http://officetanaka.net/excel/vba/statement/SendKeys.htm

関連するQ&A