Share via


UserTextured Method [Publisher 2003 VBA Language Reference]

Fills the specified shape with small tiles of an image.

expression.UserTextured(TextureFile)

expression Required. An expression that returns one of the objects in the Applies To list.

TextureFile  Required String. The name of the texture file.

Remarks

To fill the shape with one large image, use the UserPicture method.

Example

This example adds two rectangles to the active publication. The rectangle on the left is filled with one large image of a picture; the rectangle on the right is filled with many small tiles of the same picture. (Note that PathToFile must be replaced with a valid file path for this example to work.)

With ActiveDocument.Pages(1).Shapes
    .AddShape(Type:=msoShapeRectangle, _
        Left:=0, Top:=0, Width:=200, Height:=100).Fill _
        .UserPicture PictureFile:="PathToFile"
    .AddShape(Type:=msoShapeRectangle, _
        Left:=300, Top:=0, Width:=200, Height:=100).Fill _
        .UserTextured TextureFile:="PathToFile"
End With

Applies to | FillFormat Object