Returns or sets the color of the interior
pattern as an index into the current color palette, or as one of the following XlColorIndex constants: xlColorIndexAutomatic or xlColorIndexNone. Read/write LongWord.
Syntax
property PatternColorIndex: LongWord;
Remarks
Set this property to xlColorIndexAutomatic to specify the automatic pattern for cells. Set this property to xlColorIndexNone to specify that you don't want a pattern (this is the same as setting the Pattern property of the Interior object to xlPatternNone).
The following illustration shows the color-index values in the default color palette.
Example
This example sets the color of the interior pattern for range A1:C10 on Worksheet one.
Workbook.Worksheets[1].Range['A1', 'C10'].Interior.Pattern := xlChecker;
Workbook.Worksheets[1].Range['A1', 'C10'].Interior.PatternColorIndex := 8;