Application VisualBasic Script

Sub pos()
    ActiveWindow.Left = 100
    ActiveWindow.Top = 200
End Sub