03/29 SELECTタグ 単・複・枠連オッズ を 選択 VBA IE操作 単勝表取込み

手前味噌サンプルですが、
http://www.ken3.org/cgi-bin/group/vba...
で 'Form(0) の アイテム(名前がKUBUN) の 値(.Value) を 24Hにする(24Hを選択する) objIE.Document.Forms(0).Item("KUBUN").Va lue = "24H"
でセットできました。

これを応用して、 'SELECT タグから 単・複・枠連オッズ を 選択 Dim tagSELECT As Object 'タグ保存用 Set tagSELECT = Me.WebBrowser1.Document.all.tags("SELECT ") 'SELECTのタグを抜き出す tagSELECT.Item("g").Value = "Ota01" 'アイテム g に Ota01 を セット、選択されている値を直接代入で変更で、セットしました。