電子書籍の厳選無料作品が豊富!

ExcelVBAでIEを操作する処理について勉強中です。

formで、nameが定義されておらず、submitが複数(4つ)ある場合です。
HTMLが下記記載の場合で、submit”A”をクリックしたいです。

<form action="XXXX/admin.cgi" method=POST><td>
<input type="submit" value="A"></td></form>
<form action="XXXX/admin.cgi" method=POST><td>
<input type="submit" value="B"></td></form>
<form action="XXXX/admin.cgi" method=POST><td>
<input type="submit" value="C"></td></form>
<form action="XXXX/admin.cgi" method=POST><td>
<input type="submit" value="D"></td></form>

VBAでのsubmitの記述を下記で試してみたのですが、うまくクリックできません。

ObjIE.document.forms(0).Action = "XXXX/admin.cgi"
ObjIE.document.forms(0).submit

どのように変えたらよいのでしょうか。。。
ご教授お願い致します。

A 回答 (1件)

レスが付かないので


考えだけ

submit を オブジェクトで 取り込む
For でオブジェクトを 回して確認
そのオブジェトが 答え A と一致したら
叩く

Dim Item As Object
dim ID
dim hit

ID=" submit "
hit="A"

Set Item = oObjDoc.getElementByType(ID)
If IsEmpty(Item) Or pItem Is Nothing Then
Set pItem = oObjDoc.getElementByName(ID)
’オブジェクトが 取れる のを 探す
endif

For Each Item In oObjDoc.getElementsByTagName("submit")

'上と同じで Name じゃなく Type かも

If Item.value = hit Then
Item.Click
End If
Next

基本 この手の質問は 技術者向けPC IE あたりで・・・
    • good
    • 0
この回答へのお礼

ご回答、ありがとうございます。
なるほど、まず、質問カテゴリーの選択ミスですね。
質問投稿、はじめてしたもので。。。すみません。

考え方のご教授、ありがとうございます。
ネット検索で模索しながら勉強してました。
何分初心者なもので、ぱっと内容理解するまでに至りませんが、
やってみます!!!

あいまいな質問にも関わらず、ご回答頂き、
ありがとうございました。m(. .)m

お礼日時:2014/02/13 14:13

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!