The TileHeight property returns or specifies the vertical size of the tile in a texture-fill pattern. The TileHeight property is measured in document units.
Examples:
The following VBA example applies a texture pattern to a rectangle such that the tile is repeated twice horizontally and three times vertically.
Sub Test()
Dim s As Shape
Dim tf As TextureFill
Set s = ActiveLayer.CreateRectangle(0, 0, 4, 4)
Set tf = s.Fill.ApplyTextureFill("Water Color")
tf.TileHeight = s.SizeWidth / 2
tf.TileWidth = s.SizeHeight / 3
End Sub