home HinoADO
Menu
  • 追加された行はこの色です。
  • 削除された行はこの色です。
  • Jww/etc/sendkeys へ行く。

#author("2017-11-26T22:23:54+09:00","","")
例としてJWLの切り替え

 set WshShell = WScript.CreateObject("WScript.Shell")
 WshShell.AppActivate "jw_win"
 WScript.Sleep 200
 WshShell.SendKeys "%S"
 WScript.Sleep 50
 WshShell.SendKeys "F"
 WScript.Sleep 50
 WshShell.SendKeys "R"
 WScript.Sleep 200
 WshShell.SendKeys "{TAB}"
 WScript.Sleep 200
 WshShell.SendKeys "{DOWN}"
 WScript.Sleep 200
 WshShell.SendKeys "{DOWN}"
 WScript.Sleep 200
 WshShell.SendKeys "{ENTER}"
 WScript.Sleep 200
 WshShell.SendKeys "+{TAB}"
 WScript.Sleep 200
 WshShell.SendKeys "JW_WIN.JWL"
 WScript.Sleep 200
 WshShell.SendKeys "%O" 

sendkeysのコマンド類は[[外部変形用エクセルVBA]]の「sendkeys」の項を参照。