API Documentation > CorelDRAW > 2025-v26 > PatternFill > IVGPatternFill
PatternFill.OriginY property
Gets or sets the vertical Origin
Syntax:
Property Get OriginY() As Double
Property Let OriginY(ByVal Value As Double)
Remarks:
The OriginY property returns or specifies the y-coordinate of the point of origin for a pattern. The OriginY property is measured in document units.
Examples:
The following VBA example applies a full-color pattern to a rectangle and offsets the first tile by 1" to the right and 1.5" upwards, relative to the lower-left corner of the rectangle.
Sub Test()
Dim s As Shape
Dim pf As PatternFill
Dim FileName As String
FileName = Application.SetupPath & "Custom\Patterns\drwx0835.pat"
Set s = ActiveLayer.CreateRectangle(0, 0, 4, 4)
Set pf = s.Fill.ApplyPatternFill(cdrFullColorPattern, FileName)
pf.OriginX = 1
pf.OriginY = 1.5 
End Sub