VBAでIEのHTMLタグの要素を操作したい

質問

お世話になります。
ExcelのVBAで作成しております。

下記のhtmlがある状態で(1)を変える場合は、
For Each itm In objIE.document.GetElementsByTagName("input")
If itm.ID = "entry_title" Then
itm.Value = "A"
Exit For
End If
Next
で変更できたのですが、(2)(要素)を変更するには、
どうしたらよいでしょうか？

お手数ですが、よろしくお願いいたします。

<input value="(1)" id="entry_title">(2)</input>

回答No.1

cj_mover · ベストアンサー

With objIE.Document.getElementById("entry_title")
　　　　.Value = "A"
　　　　.NextSibling.Data = "B"　　　　'　　　　（１／３択）
　　　　.NextSibling.NodeValue = "B"　　　　'　　　　（２／３択）
　　　　.NextSibling.textContent = "B"　　　　'　　　　（３／３択）
　　End With

こんな感じのことでしょうか。
三者択一です。

ご提示のループにはめるなら、
　　With objIE.Document.getElementById("entry_title")
を
　　With itm
に換えて
itm.Value = "A"
の位置に挿入します。