VBAでブラウザ上のボタンがクリックできないので困っています。

質問

VBAでブラウザ上のボタンがクリックできないので困っています。

ソースは、

『　<input type="submit" value="全員に公開" onClick="sendClickLog(this,'[main]全員に公開ボタン');changeSave('saveentry','/ucs/entry/srventryinsertend1.do', '0');return false;" />　』

この部分をクリックしたいです。
NameやIdがないのでobjIE.documentなどで設定できるのでしょうか？

教えてください。おねがいいたします。

回答No.1

hallo-2007 · ベストアンサー

こんな方法は

For Each ctl In objIE.Document.getElementsByTagName("input")
if ctl.value = "全員に公開" then
ctl.click
exit for
end if
Next

WEB上の全てのエレメントに対して実行
Value　が　全員に公開　のエレメントに対して　Click

補足

hallo-2007さん

ありがとうございます。　クリックすることができました。
ほんと助かりました。

もうひとつだけ聞きたいことがあるのですが、

ボタンをクリックした後

新たにポップアップウインドウが開かれます。

そのウインドウをすぐ閉じたいのですが

どうすれば閉じることができますか？