PatternColor 属性

       

以 RGB 值返回或设置内部图案的颜色。Variant 类型,可读写。

示例

本示例对 Sheet1 中矩形一的内部图案的颜色进行设置。

With Worksheets("Sheet1").Rectangles(1).Interior
    .Pattern = xlGrid
    .PatternColor = RGB(255,0,0)
End With