ActiveDocument.ReferencePoint = cdrTopLeft
Set s1 = ActiveDocument.ActiveLayer.CreateRectangle2(StartX, StartY,
Width, height)
but the reference point always seems to be the bottom left, no matter
what I set ReferencePoint to. Does this feature work?