jQueryのflatpickrをVBAで攻略する第3回 年の入力をしよう

こんにちは、今日は第3回「年の入力をしよう」です。

第1回で起動したカレンダーの年を変更する方法です。ページの仕様を見るとINPUTタグが付いていましたがボックスはなく、横方向のスピンボタンだけです。マウスイベントしかありません。ただし、clickイベントではなく、mousedownイベントです。

VBA
Dim elem2 As Object
'デフォルトは2018 arrowUp:2018→2019 arrowDown:2018→2017
Set elem2 = objIE.document.getElementsByClassName("arrowUp")(0)

Dim evt2 As Object
Set evt2 = objIE.document.createEvent("MouseEvents")
evt2.initMouseEvent "mousedown", True, True, objIE, 0, 0, 0, 0, 0, False, False, False, False, 0, Null
elem2.dispatchEvent evt2

上記のmousdownイベントの構文は、clickイベントにも使えますよ。では。

ブログ気持玉

クリックして気持ちを伝えよう!

ログインしてクリックすれば、自分のブログへのリンクが付きます。

→ログインへ

なるほど(納得、参考になった、ヘー)
驚いた
面白い
ナイス
ガッツ(がんばれ!)
かわいい

気持玉数 : 0

この記事へのコメント