リスト選択時にdispatchEventが効かない 削除
Message#2 2018年4月18日(水)17時17分 From: ジャッカル |
そういう場合は、直接javascriptをうごかしたらいいと思う > 下記サイトの国リストから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 |
上のメッセージを削除します。
よければパスワードを入力し、削除ボタンをクリックしてください。