Patterned Method
Applies To
FillFormat object.
Description
Sets the specified fill to a pattern.
Syntax
expression.Patterned(Pattern)
expression Required. An expression that returns a FillFormat object.
Pattern Required Long. The pattern to be used for the specified fill. Can be any of the MsoPatternType constants.
Remarks
Use the BackColor and ForeColor properties to set the colors used in the pattern.
Example
This example adds an oval with a patterned fill to myDocument.
Set myDocument = ActiveDocument
With myDocument.Shapes.AddShape(msoShapeOval, 60, 60, 80, 40).Fill
.ForeColor.RGB = RGB(128, 0, 0)
.BackColor.RGB = RGB(0, 0, 255)
.Patterned msoPatternDarkVertical
End With