Arranging and Resizing Windows: ppWindowMaximized, ppWindowMinimized, or ppWindowNormal.
Sub windowState() Application.WindowState = ppWindowMaximized Windows.Arrange ArrangeStyle:=ppArrangeCascade End Sub