特定のキーボード操作を指定の回数繰り返すVBScript
Win画面入力の操作で「↓」キーを50回繰り返す処理をする必要があり、
エミュレーションの「↓」キーをループさせると処理に時間がかかるため、
スクリプト実行をすることにしました。
ライブラリ等検索してみましたが見つけることができませんでした。
「↑、↓、←、→、TAB」からキーを選択し、指定の画面、指定の回数実行できます。
VBScript初心者のため例外処理はかけていません。動作も保証できません。
WinActor向けの例外処理、このライブラリがあるよ!などありましたらご教授よろしくお願い申し上げます。
_______________________________ Dim kaisu Dim key Dim keyType Dim objWshShell '引数の取得 winTitle = GetUMSWindowTitle(@ウィンドウ識別名@) kaisu = !回数! key = !キー|↑,↓,←,→,TAB! Select Case key Case "↑" keyType = "{UP}" Case "↓" keyType = "{DOWN}" Case "←" keyType = "{LEFT}" Case "→" keyType = "{RIGHT}" Case "TAB" keyType = "{TAB}" End Select 'オブジェクト変数の宣言とWshShellオブジェクトの作成。 Set objWshShell = WScript.CreateObject("WScript.Shell") objWshShell.AppActivate winTitle For i = 1 To kaisu objWshShell.SendKeys keyType Next
iso 編集済みのコメント 2023年5月24日 10:05
回答とコメントは、会員登録(無料)で閲覧できるようになります。
新規登録