エクセルVBAでUWSCを使う

VBAのShell関数を使ってUWSCを起動してみました。
UWSCのオプション設定を”管理者としてこのプログラムを実行する”にチェック
すると、以下のプログラムでは動かなくなりました。

実行時エラー’5’
プロシージャの呼び出し、または引数が不正です。
となりました。

管理者として実行するUWSCをVBAで動かす方法はありますか？

pr_name = "C:\UWSC\UWSC.exe"
path_name = "C:\UWSC\"
file_name = "Buy.UWS"
Shell (pr_name & " " & path_name & file_name)

No.1 ベストアンサー 回答者： WindFaller 回答日時： 2017/02/07 18:09

UWSCを管理者設定にしたら、本体のExcel側も管理者モードで立ち上げなければ、UWSCは動かないはずです。

Excelは管理者モードではありませんから、UWSCも管理者モードをやめないと、自由に使えません。

http://www.uwsc.info/faq.html　
FAQにもそう書かれています。
「アプリの操作ができない、記録ができない（Vista/7/8.x/10）　　#N29
　　実行レベル(UAC)を合わせてください。
　　アプリが管理者権限で実行されている場合には、UWSCも管理者権限が必要です
　　UWSCを起動する時に、右クリック　"管理者として実行..."より起動する
　　もしくはプロパティの"互換性"タブより"特権レベル"にチェックを入れてください
　　
　　逆にアプリが一般ユーザの場合には、UWSCも管理者権限ではなく一般ユーザにしてみてください」

この回答へのお礼

ありがとうございました。
エクセル側を管理権限で開くだけで解決しました。
これでいろいろできそうです。

お礼日時：2017/02/07 23:56