Const SHOWSTATE_NORMAL = 2
Const WNDCHANGE_CLIP_TO_WORKSPACE = 2

Set wnd = CreateObject("UltraMon.Window")
If wnd.GetForegroundWindow() = True Then
	If wnd.ShowState = SHOWSTATE_NORMAL Then
		wnd.Centered = True
		wnd.ApplyChanges WNDCHANGE_CLIP_TO_WORKSPACE
	End If
End If