Power Automate Desktop 簡易起動スクリプト

Power Automate Desktopを簡易的に起動するスクリプトです。

特定のものを何度も起動する場合は、便利だと思います。

当方　Windows10 Home　32bitの環境です。　

メモ帳で下部のコードを保存して、拡張子を「.vbs」にすれば、たぶん動くはず。

注意事項

Power　Automate　Desktopは閉じた状態から始めています。

一番上に実行したいものが表示されるようにしています。

Power　Automate　Desktopは前の状態を保持しているので、

検索窓などでカーソルが残ったまま終了していると、

結果が変わってしまいます。

たいていは前回実行後の状態なので、 

いったん一覧の1つ目を強制的に実行しています。
もし数種類使い分けたい場合は、PGUPの後にDOWN

以下コード

Option Explicit Dim objWshShell 'シェルオブジェクトの作成 Set objWshShell = WScript.CreateObject("WScript.Shell") 'シェルの実行 objWshShell.Run """C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Power Automate Desktop\Power Automate Desktop.lnk""" 'パソコンのスペックにより時間が前後するので、起動待ちも含めて2回上下に移動させています。 WScript.Sleep(500) objWshShell.SendKeys("{PGDN}") WScript.Sleep(500) objWshShell.SendKeys("{PGUP}") WScript.Sleep(500) objWshShell.SendKeys("{PGDN}") WScript.Sleep(500) objWshShell.SendKeys("{PGUP}") WScript.Sleep(500) '最上部のものを実行しています objWshShell.SendKeys("{TAB}") WScript.Sleep(500) objWshShell.SendKeys("{ENTER}")