UserPicture Method

expression.UserPicture(PictureFile)

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

PictureFile   Required String. The name of the picture file.

Remarks

To fill the shape with small tiles of an image, use the UserTextured 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