下記の質問をいただくが、解決しなかった。再度 あとで見てみる・・・
◆質問「VBAのIE操作でリスト選択時にFireEventが効かない」
〇VBAコーディング
For Each Obj In ObjIE.Document.getElementsByTagName("OPTION")
If Obj.Value = "Black Gunmetal" Then
Obj.Selected = True
Obj.FireEvent ("OnChange")
Exit For
End If
Next
上記質問に対して、の 回答が
イベントが発生しないパターンで、似ているのが
三流君VBA:IE ラジオボタン(RADIO)の.Checkedと.Clickの違い
http://www.ken3.org/vba/backno/vba148.html
で、
.Click で イベント発生ですが、
三流君VBA:IE SELECT後 .fireEventでJavaScriptのイベントを起動
http://www.ken3.org/vba/backno/vba155.html
みたいに
現在使用中の .fireEvent で 発生でも動作すると思いますが・・・
スバリの回答になっていなくスミマセン。
For Each Obj In ObjIE.Document.getElementsByTagName("OPTION") If Obj.Value = "Black Gunmetal" Then Msgbox "クリック?してみる" Obj.Selected = True 'Obj.FireEvent ("OnChange") Obj.Click 'クリックしてみる Msgbox "ループからでる" Exit For End If Next
何かの参考となれば幸いです。 三流プログラマー Ken3
と返信するが、動作しなかったみたい。
あとで、見てみる。