dechnostick https://blog.hatena.ne.jp/dechnostick/ デクノスティック https://dechnostick.hatenablog.com/ VBA .NET ShellExecuteEx で "runas" する。こんな感じになる。 Dim ei As SHELLEXECUTEINFO ei.cbSize = LenB(ei) ei.fMask = SEE_MASK_NOCLOSEPROCESS ' プロセスを終了させない ei.hwnd = GetActiveWindow() ' シートのハンドル ei.lpVerb = "runas" ei.lpFile = ActiveWorkbook.Path & "\ConsoleApplication1.exe" ei.lpParameters = "" ' コマンドライン引数(ある場合) ei.lpD… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fdechnostick.hatenablog.com%2Fentry%2F20120307%2F1331140472" title="VBA で管理者権限に昇格する必要のある外部アプリを実行する - デクノスティック" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> http://cdn-ak.f.st-hatena.com/images/fotolife/d/dechnostick/20120308/20120308021804.png Hatena Blog https://hatena.blog 2012-03-07 02:14:32 rich https://dechnostick.hatenablog.com/entry/20120307/1331140472 1.0 100%