Examples:
The following VBA example sets the coordinates of the drawing window's center to (0,0) in the document's active view. This places the center of the drawing window in the lower-left corner of the page.
Sub OriginXOriginY()
With ActiveWindow.ActiveView
.OriginX = 0
.OriginY = 0
End With
End Sub