Set Win = CreateObject("Shell.Application") Win.ControlPanelItem "appwiz.cpl"