Uruchomienie apletu Ustawień ekranu

dim objShell
set objShell = CreateObject("Shell.Application")
objShell.ControlPanelItem("desk.cpl")