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

よろしくお願いします。

回答No.2

noname#233986

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

ごめんなさい！

お礼

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

回答No.1

noname#233986

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