JQueryのchangeイベント実行

Message#2 2018年10月26日(金)11時06分
From: ジャッカル

どれがJQueryのイベントコード？

> Redmineというプロジェクト管理ツールから、登録されているチケットをVBAで取得しようとしています。取得処理の中で、セレクトボックスを選択した後でJQueryのchangeイベントが発生する箇所があるのですが、イベントの起動ができません。本掲示板の過去スレッドに出ていた方法も試したのですが、うまくいきませんでした。
> みなさんの知恵をお借りしたいです。よろしくお願いします。
>
> ＜対象ページの構造＞
> １）HTMLの内容
> ★で要素を選択すると、要素に応じたセレクトボックスが表示されます。
> td class="add-filter"
> label for="add_filter_select"?フィルタ追加 /label
> select id="add_filter_select".../select★
> /td
>
> ２）イベントの確認
> ブラウザでselect id="add_filter_select"でEvent Listeners を
> 確認すると、以下の通りでした。
> ▼change
> 　▼select#add_filter_select
> application.js?1396112202:78
> useCapture: true
> passive: false
> once: false
> ▼handler: f()
> ?[[scopes]]: Scopes[1]
> [[FunctionLocation]]: <unknown>
> ?__proto__: f()
> ?prototype: {constructor: f}
> name: ""
> length: 0
> caller: null
> arguments: null
> guid: 24
>
> handler の後のf() にマウスを乗せると、
> function() { addfilter($this).val(), '',[]; }
> と表示されました。
>
> ３）ソースの確認
> handlerのf()で"Show Function Definition"を実行すると
> 以下のソールが表示・選択されました。
> function initFilters() {
> $('#add_filter_select').change(function() {
> addFilter($(this).val(), '', []);
> });
>
> ＜試したこと＞
> １）以下の方法では、値がセレクトボックスに表示されましたがイベント
> 　　は発生しませんでした。
> Dim evt As Object
> Set evt = objIE.document.createEvent("HTMLEvents")
> evt.initEvent "change", True, False
>
> objIE.document.getElementById("add_filter_select").Value = "tracker_id"
> objIE.document.getElementById("add_filter_select").dispatchEvent evt
>
> ２）以下の方法も、値がセレクトボックスに表示されただけでイベント発生せず。
> Dim evt As Object
> Set evt = objIE.document.createEvent("HTMLEvents")
> evt.initEvent "change", True, False
>
> With objIE.document.getElementById("add_filter_select")
> .Value = "tracker_id"
> .dispatchEvent evt
> End With
>
> ３）JQueryを直接起動する（つもり。JavaScriptやJQueryは良く分から
> 　　ないので、Webに出ていたものを例にやってみました）
> 　　これも、値は表示されましたがイベントは起きませんでした。
>
> Dim evt As Object
> Set evt = objIE.document.createEvent("HTMLEvents")
> evt.initEvent "change", True, False
>
> objIE.document.getElementById("add_filter_select").Value = "tracker_id"
> objIE.navigate "JavaScript:addfilter('add_filter_select')"
>
> 以上です。