TextureFill.OriginY

Property OriginY As Double

The OriginY property returns or sets the vertical offset of the tile from the lower-left corner of the parent shape.

The OriginY property is measured in document units.

The following code example applies a texture to a rectangle and offsets the tile by 1" from the bottom of the page:

Sub Test() 
 Dim s As Shape 
 Dim tf As TextureFill 
 Set s = ActiveLayer.CreateRectangle(0, 0, 4, 4) 
 Set tf = s.Fill.ApplyTextureFill("Above the Storm", "Samples 9") 
 tf.OriginY = 1 
End Sub