API Documentation > CorelDRAW > 2025-v26 > Shape > IVGShape
Shape.PositionX property
Returns or sets the horizontal position (X) of the shape on the page, according to the document's reference point
Syntax:
Property Get PositionX() As Double
Property Let PositionX(ByVal Value As Double)
Remarks:
The PositionX property returns or specifies the horizontal, or x-, coordinate of a shape. The position is relative to a reference point specified by the Document.ReferencePoint property. See also the Shape.GetPosition, Shape.SetPosition, and Shape.Move methods.
Examples:
The following VBA example moves objects, as needed, so that they are all within the current page boundaries.
Sub Test()
Dim s As Shape
Dim pw As Double, ph As Double
ActivePage.GetSize pw, ph
For Each s In ActivePage.Shapes
  If s.Type <> cdrGuidelineShape Then

 ActiveDocument.ReferencePoint = cdrBottomLeft

 If s.PositionX < 0 Then s.PositionX = 0


If s.PositionY < 0 Then s.PositionY = 0


  ActiveDocument.ReferencePoint = cdrTopRight


  If s.PositionX > pw Then s.PositionX = pw



 If s.PositionY > ph Then s.PositionY = ph



 End If


  Next s



End Sub