sendkeysにてALT+CTRL+INSERTを同時に行いたい

質問

VBScripptのsendkeysにてALT+CTRL+INSERTを同時に行いたい

下記にて、行いましたが、うまくいきません
SendKeys "%^{INSERT}"

どなたかヒントを御願いします
→３つのキーは同時にできない？

回答No.1

SHIMAPEE · ベストアンサー

私のWindows XPでは三つのキーでも問題ないようです。推定ですがAppActivateが上手くいっていないのではないでしょうか。

【やってみたこと１】
秀丸でAlt+Ctrl+Insを行番号表示／非表示に割り当てて、下のWSH VBScriptを実行してみた。行番号表示がトグルできた。

set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.AppActivate "新規" '新規に秀丸を開いておき、それをAppActivate
WshShell.SendKeys "%^{INSERT}"

【やってみたこと２】
デスクトップのプログラムのショートカットのプロパティのショートカットキーにCtrl+Alt+Insertを割り当てて、下のWSH VBScriptを実行してみた。プログラムが起動できた。秀丸の割り当てよりも優先されるのでAppActivateは不要なようだ。

set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.SendKeys "^%{INSERT}"

お礼

お礼が遅れてしません。
サンプルまでありがとうございました