セレクトボックスの選択について

Message#2 2015年3月28日(土)10時23分
From: VBAマスター

ぴぃスケのメッセージ(#1)への返事
> 下記のHTMLの箇所を想定しています。

想定とありますがこちら実際のHTMLソースですが？

selectタグはidではなくcgiやphpなどで処理する場合、普通nameが必要となります。
こちらもjavascriptで処理している可能性が高いです。
DOM的にid選択では、optionタグと連動していないのかもしれません。

確認環境がないのでなんともいえませんが、optionタグにselectedを設定する方法ならいけるかもしれません。

Sub test()

Dim objIE As InternetExplorer

'option要素を全て抽出
For i = 0 To objIE.document.getElementsByTagName("option").length - 1

If objIE.document.getElementsByTagName("option")(i).vaue = "EURJPY" Then

objIE.document.getElementsByTagName("option")(i).selected="selected"

Exit For

End If

Next i

【selectの参考情報】※クイックリファレンスサイトより引用
<SELECT>はセレクトボックスを作成するタグです。初期値ではプルダウン式のメニューとなりますが、size属性で選択肢の表示行数を指定することができます。セレクトボックス内の選択肢は<OPTION>タグで指定します。

フォームの部品としてデータが送信される際には、 <SELECT>タグのname属性で付けたデータ名と、選択された<OPTION>のvalue属性の値を一組にして、 <FORM>タグのaction属性で指定したサーバー上のファイルに、 <FORM>タグのmethod属性で指定した転送方法で送られます。

<SELECT>はフォームの部品としてではなく、ユーザーインターフェースとしても使用することができます。ただし、Netscape Navigator4以前では、 <FORM>～</FORM>内に記述しないと無視されるので注意が必要です。