Application VisualBasic Script

Sub newWindow()
    ActiveWindow.NewWindow
End Sub