「コード1」のようなコードでコントロールパネルの「ユーザー アカウント」を起動して「ユーザーがこのコンピューターを使うには...」のチェックを外したいのですが AppActivate() からは false が返るだけで意図した動作ができません。 以下は試したこと、わかったことです ・Wscript.Quit しないで Sendkeys() を実行させるようなコードに変更してもチェックは外れませんでした ・「コード2」の状態でキーボードで直接 Alt+E を行うとチェックは外れるのでアクティブになっているように見えるのですがコード上ではうまくいっていません AppActivate() に渡す引数が間違っている可能性もありそうです。 環境はwindows8.1です。 どなたかご存知の方、ご教授頂けないでしょうか。 vbs 1' コード1 2Option Explicit 3Dim shell