VBAから即時関数を実行できますか 削除
| Message#2 2016年10月17日(月)11時23分 From: moku |
| まだ即時関数を実行する方法は分かりませんが、 WSオブジェクトのSendKeysメソッドを使って イベントを起こすことができました。 SendKeysはあまり使いたくないですが。 ちなみにVBAのSendKeysステートメントでは うまくいきませんでした。 理由はわかりません。 Dim wobj As Object Dim WSオブジェクト As Object Set WSオブジェクト = CreateObject("WScript.Shell") Set wobj = IE.document.getElementById("items2_Setting") 'items2_Settingにフォーカスを移す wobj.Focus Application.Wait Now + TimeValue("00:00:01") WSオブジェクト.SendKeys (" ") 'スペースキーを送る Application.Wait Now + TimeValue("00:00:01") WSオブジェクト.SendKeys ("{DOWN}") '↓キーを送る Application.Wait Now + TimeValue("00:00:01") |
上のメッセージを削除します。
よければパスワードを入力し、削除ボタンをクリックしてください。
