Set Shell = WScript.CreateObject("Shell.Application") Shell.UndoMinimizeAll