リスト選択時にdispatchEventが効かない 削除
| Message#1 2018年3月18日(日)18時17分 From: r_federer23 |
| 下記サイトの国リストからJapanを選択できるが、通貨リストからUSDが選択出来ません（表示上選択できるがselected=""が更新されない）共に同じ方法「dispatchEvent」でイベント発生しています。通貨リストからUSDを選択する方法をご教示お願い致します。 〇対象サイト http://www.asos.com/asos/asos-chelsea-boots-in-grey-faux-suede/prd/7615637 （右上の国旗アイコンを選択するとリスト選択windowが表示される） 〇VBAコーディング Set evt = ObjIE.Document.createEvent("HTMLEvents") evt.initEvent "change", True, False For Each Obj In ObjIE.Document.getElementsByTagname("SELECT") '国（Japan）選択 If Obj.OuterHTML Like "*country*" Then Obj.selectedindex = 106 Obj.dispatchEvent evt Exit For End If Next For Each Obj In ObjIE.Document.getElementsByTagname("SELECT") '通貨（USD）選択 If Obj.OuterHTML Like "*currency*" Then Obj.selectedindex = 1 Obj.dispatchEvent evt Exit For End If Next |
上のメッセージを削除します。
よければパスワードを入力し、削除ボタンをクリックしてください。
