| Point ：VBAからコントロールパネルを開きたい。
Sub Test()
RetVal = Shell("Ｃ:\WINDOWS\control.EXE
appwiz.cpl", 1)
’アプリケーションの追加と削除のプロパティー
End Sub
'この例ではアプリケーションの追加と削除ですがこの他にもたくさんあるので
'一般的なものを表にしてみました。
'引数を与えてやることで、タブの指定もできます。
Sub Test2()
RetVal = Shell("Ｃ:\WINDOWS\control.EXE
appwiz.cpl,,3", 1)
’.cplのあとにカンマを２ついれて数字を入れてやります。
’上の例では３番目のタブをオープンします。
End Sub
| コントロールパネル |
ファイル名 |
| アプリケーションの追加と削除 |
appwiz.cpl |
| 画面 |
desk.cpl |
| インターネット |
inetcpl.cpl |
| 地域 |
intl.cpl |
| ゲームコントローラ |
joy.cpl |
| マルチメディア |
mmsys.cpl |
| モデム |
modem.cpl |
| ネットワーク |
netcpl.cpl |
| パスワード |
password.cpl |
| 電源の管理 |
powercfg.cpl |
| システム |
sysdm.cpl |
| ダイヤル |
telephon.cpl |
| 日付と時刻 |
timedate.cpl |
|
