FillFormat.Pattern Property

Syntax

expression.Pattern

expression A variable that represents a FillFormat object.

Example

This example adds a rectangle to myDocument and sets its fill pattern to match that of the shape named "rect1." The new rectangle has the same pattern as rect1, but not necessarily the same colors. The colors used in the pattern are set with the BackColor and ForeColor properties.

Set myDocument = ActivePresentation.Slides(1) With myDocument.Shapes pattern1 = .Item("rect1").Fill.Pattern With .AddShape(msoShapeRectangle, 100, 100, 120, 80).Fill .ForeColor.RGB = RGB(128, 0, 0) .BackColor.RGB = RGB(0, 0, 255) .Patterned pattern1 End With End With

See also:

• FillFormat Object
• FillFormat Object Members