dポイントプレゼントキャンペーン実施中!

エクセルのVBAでIEのページを(メニュー選択)進める件ですが

Dim tag As String
Dim objtag As Object
in_str = "新しく記事を書く"
tag = "li"
Set objtag = doc.getElementsByName(tag)(0)

For Each objtag In IE.document.getElementsByTagName(tag)
  If InStr(objtag.outerHTML, in_str) > 0 Then
   Exit For
  End If
Next
Debug.Print objtag.outerHTML

objtag.Click

For は 機能していて、Debug は
<LI><A href="?mode=editor&amp;process=new">新しく記事を書く</A>
で 止まっています。

で、叩く方法は??
Click が機能しないのですが

objtag. の 後に お助け文字が全く出ませんので、行き詰りました。

A 回答 (1件)

クリックするのは、<li>の中にある<a>だから、



objtag.getElementsByTagName('A')[0].click
もしくは
objtag.firstChild.click
    • good
    • 0
この回答へのお礼

感謝 解決

お礼日時:2014/02/19 13:49

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