Returns or sets the color of the interior pattern as an RGB value. Read/write Variant.
Syntax
expression.PatternColor
expression A variable that represents an Interior object.
Example
This example sets the color of the interior pattern for rectangle one on Sheet1
With Worksheets("Sheet1").Rectangles(1).Interior
.Pattern = xlGrid
.PatternColor = RGB(255, 0, 0)
End With