Shell.ControlPanelItem メソッド

本ページには広告が含まれています。

指定されたコントロールパネル(*.cpl)アプリケーションを実行します。アプリケーションがすでに開いている場合は、実行中のインスタンスがアクティブになります。

構文
Shell.ControlPanelItem( bstrDir )
引数
bstrDir (String)必須
appwiz.cpl
「コントロール パネル\プログラム\プログラムと機能」を開く。
desk.cpl
「Windowsの設定\システム\ディスプレイ」を開く。
inetcpl.cpl
「インターネットのプロパティ」を開く。
sysdm.cpl
「システムのプロパティ」を開く。
main.cpl
「マウスのプロパティ」を開く。
戻り値
指定されたコントロールパネル(* .cpl)アプリケーションを実行します。アプリケーションがすでに開いている場合は、実行中のインスタンスがアクティブになります。

引数に指定できるコマンドと起動するプログラム

コマンド プログラム
calc 電卓
charmap 文字コード表
dxdiag DirectX 診断ツール
eudcedit 外字エディタ
excel Microsoft Office Excel
firewall.cpl Windows Defender ファイアウォール
fxscover FAX 送付状エディター
joy.cpl ゲーム コントローラー
magnify 拡大鏡
mrt Microsoft Windows 悪意のあるソフトウェアの削除ツール
mspaint ペイント
narrator ナレーターの設定
notepad メモ帳
osk スクリーンキーボード
outlook Outlook
pbrush ペイント
powerpnt PowerPoint
wmimgmt.msc WMIコントロール
wmplayer Windows Media Player
winword Microsoft Office Word
wordpad ワードパッド
write ワードパッド
コマンド パス
shell:ControlPanelFolder コントロール パネル\すべてのコントロール パネル項目
shell:AddNewProgramsFolder コントロール パネル\すべてのコントロール パネル項目\プログラムの取得
shell:AppUpdatesFolder インストールされた更新プログラム
shell:ChangeRemoveProgramsFolder コントロール パネル\すべてのコントロール パネル項目\プログラムと機能
shell:ConflictFolder コントロール パネル\すべてのコントロール パネル項目\同期センター\競合
shell:ConnectionsFolder コントロール パネル\すべてのコントロール パネル項目\ネットワーク接続
shell:PrintersFolder すべてのコントロール パネル項目\プリンター
shell:SyncCenterFolder
shell:SyncResultsFolder コントロール パネル\すべてのコントロール パネル項目\同期センター\同期結果
shell:SyncSetupFolder コントロール パネル\すべてのコントロール パネル項目\同期センター\同期のセットアップ
shell:AppData C:\Users\username\AppData\Roaming
shell:Administrative Tools C:\Users\username\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Administrative Tools
shell:Cookies C:\Users\username\AppData\Local\Microsoft\Windows\INetCookies
shell:NetHood C:\Users\username\AppData\Roaming\Microsoft\Windows\Network Shortcuts
shell:PrintHood C:\Users\username\AppData\Roaming\Microsoft\Windows\Printer Shortcuts
shell:Programs C:\Users\username\AppData\Roaming\Microsoft\Windows\Start Menu\Programs
shell:Recent C:\Users\username\AppData\Roaming\Microsoft\Windows\Recent
shell:SendTo C:\Users\username\AppData\Roaming\Microsoft\Windows\SendTo
shell:Start Menu C:\Users\username\AppData\Roaming\Microsoft\Windows\Start Menu
shell:Startup C:\Users\username\AppData\Roaming\Microsoft\Windows\Start Menu\Programs\Startup
shell:Templates C:\Users\username\AppData\Roaming\Microsoft\Windows\Templates
shell:Quick Launch C:\Users\username\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch
shell:User Pinned C:\Users\username\AppData\Roaming\Microsoft\Internet Explorer\Quick Launch\User Pinned
shell:Local AppData C:\Users\username\AppData\Local
shell:Cache C:\Users\username\AppData\Local\Microsoft\Windows\INetCache
shell:CD Burning C:\Users\username\AppData\Local\Microsoft\Windows\Burn\Burn
shell:History C:\Users\username\AppData\Local\Microsoft\Windows\History
shell:Common AppData C:\ProgramData
shell:Common Templates C:\ProgramData\Microsoft\Windows\Templates
shell:Common Start Menu C:\ProgramData\Microsoft\Windows\Start Menu
shell:Common Startup C:\ProgramData\Microsoft\Windows\Start Menu\Programs\StartUp
shell:Common Programs C:\ProgramData\Microsoft\Windows\Start Menu\Programs
shell:Common Administrative Tools C:\ProgramData\Microsoft\Windows\Start Menu\Programs\Administrative Tools
shell:ProgramFiles C:\Program Files (x86)
shell:ProgramFilesCommon C:\Program Files (x86)\Common Files
shell:Common Desktop C:\Users\Public\Desktop
shell:Common Documents C:\Users\Public\Documents
shell:CommonDownloads C:\Users\Public\Downloads
shell:CommonMusic C:\Users\Public\Music
shell:CommonPictures C:\Users\Public\Pictures
shell:CommonVideo C:\Users\Public\Videos
shell:Libraries ライブラリ
shell:UsersLibrariesFolder ライブラリ
shell:DocumentsLibrary ライブラリ\ドキュメント
shell:MusicLibrary ライブラリ\ミュージック
shell:PicturesLibrary ライブラリ\ピクチャ
shell:VideosLibrary ライブラリ\ビデオ
shell:UserProfiles C:\Users
shell:Profile C:\Users\username
shell:UsersFilesFolder C:\Users\username
shell:Contacts C:\Users\Username\Contacts
shell:Downloads ダウンロード
shell:Favorites C:\Users\Username\Favorites
shell:Links C:\Users\Username\Links
shell:My Music ミュージック
shell:My Pictures ピクチャ
shell:My Video ビデオ
shell:Personal ドキュメント
shell:SavedGames C:\Users\Username\Saved Games
shell:Searches C:\Users\Username\Searches
shell:Public C:\Users\Public
shell:SampleMusic C:\Users\Public\Music\Sample Music
shell:SamplePictures C:\Users\Public\Pictures\Sample Pictures
shell:SampleVideos C:\Users\Public\Videos\Sample Videos
shell:Windows C:\Windows
shell:Fonts C:\Windows\Fonts
shell:ResourceDir C:\Windows\Resources
shell:System C:\Windows\System32
shell:Desktop デスクトップ
shell:HomeGroupFolder ホームグループ
shell:MyComputerFolder PC
shell:NetworkPlacesFolder ネットワーク
shell:RecycleBinFolder ごみ箱
shell:SearchHomeFolder search-ms:

プログラム実行例

コントロールパネルを起動する

UWSC
DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.ControlPanelItem("control")
SLEEP(3.000)

DIM ID = GETID("コントロール パネル")
//CTRLWIN(ID, CLOSE)
使用関数
解説

「プログラムと機能」を開く

UWSC
DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.ControlPanelItem("appwiz.cpl")
SLEEP(3.000)

DIM ID = GETID("プログラムと機能")
CTRLWIN(ID, CLOSE)
使用関数

「ディスプレイ」を開く

UWSC
DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.ControlPanelItem("desk.cpl")
SLEEP(3.000)

DIM ID = GETID("設定", "ApplicationFrameWindow")
CTRLWIN(ID, CLOSE)
使用関数

「インターネットのプロパティ」を開く

UWSC
DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.ControlPanelItem("inetcpl.cpl")
SLEEP(3.000)

DIM ID = GETID("インターネットのプロパティ", "#32770")
CTRLWIN(ID, CLOSE)
使用関数

「システムのプロパティ」を開く

UWSC
DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.ControlPanelItem("sysdm.cpl", "#32770")
SLEEP(3.000)

DIM ID = GETID("システムのプロパティ")
CTRLWIN(ID, CLOSE)
使用関数

「マウスのプロパティ」を開く

UWSC
DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.ControlPanelItem("main.cpl")
SLEEP(3.000)

DIM ID = GETID("マウスのプロパティ", "#32770")
CTRLWIN(ID, CLOSE)
使用関数

「電卓」を起動

UWSC
DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.ControlPanelItem("calc")
SLEEP(3.000)

DIM ID = GETID("電卓", "ApplicationFrameWindow")
CTRLWIN(ID, CLOSE)
使用関数

「文字コード表」を起動

UWSC
DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.ControlPanelItem("charmap")
SLEEP(3.000)

DIM ID = GETID("文字コード表", "#32770")
CTRLWIN(ID, CLOSE)
使用関数

「DirectX 診断ツール」を起動

UWSC
DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.ControlPanelItem("dxdiag")
SLEEP(3.000)

DIM ID = GETID("DirectX 診断ツール", "#32770")
CTRLWIN(ID, CLOSE)
使用関数

「外字エディタ」を起動

UWSC
DIM Shell = CREATEOLEOBJ("Shell.Application")
Shell.ControlPanelItem("eudcedit")
SLEEP(3.000)

DIM ID = GETID("コードの選択", "#32770")
CTRLWIN(ID, CLOSE)
ID = GETID("外字エディター", "Afx:dd0000:0:10003:6:")
CTRLWIN(ID, CLOSE)
使用関数

参考文献

  1. 「ファイル名を指定して実行」を極める #Windows - Qiita
  2. https://takuya-1st.hatenablog.jp/entry/2016/02/05/234847