Move Access Window
acCmdAppMove
Changes mouse into 4 headed arrow to enable the Access window to be moved.
'***************** Code Start *******************
Sub WinMove()
DoCmd.RunCommand acCmdAppMove
End Sub
'****************** Code End ********************