Create a text file called something.vbs. Create a shortcut to it and place the shortcut on the desktop or Start menu (only places windows looks for shortcuts with shortcut keys), right click it, Properties, and set it to a keystroke. This will do all open windows.
Paste this in
Set wshshell = CreateObject("Shell.Application")
wshshell.TileHorizontally
Choose one from below
CascadeWindows Cascadess all of the windows on the desktop.
EjectPC Ejects the computer from its docking station.
FileRun Displays the Run dialog to the user.
FindComputer Displays the Find: Computer dialog box.
FindFiles Displays the Find: All Files dialog box.
Help Displays Microsoft® Windows® Help.
MinimizeAll Minimizes all of the windows on the desktop.
RefreshMenu Refreshes the contents of the Start Menu.
SetTime Displays the Date/Time Properties dialog box.
ShutdownWindows Displays the Shut Down Windows dialog box.
Suspend Suspends the computer.
TileHorizontally Tiles all of the windows on the desktop horizontally.
TileVertically Tiles all of the windows on the desktop vertically.
TrayProperties Displays the Taskbar Properties dialog box.
UndoMinimize ALL Restores all of the windows on the desktop to the
same state they were in before the last MinimizeAll command.
To tile/cascade specific windows ctrl + click them on the taskbar, then right click one and choose cascade or tile.