ShapeRange.Fill Property (Excel)
Returns a FillFormat object for a specified shape or a ChartFillFormat object for a specified chart that contains fill formatting properties for the shape or chart. Read-only.
Syntax
expression .Fill
expression A variable that represents a ShapeRange object.
Example
This example adds a rectangle to myDocument and then sets the foreground color, background color, and gradient for the rectangle's fill.
Set myDocument = Worksheets(1)
With myDocument.Shapes.AddShape(msoShapeRectangle, _
90, 90, 90, 50).Fill
.ForeColor.RGB = RGB(128, 0, 0)
.BackColor.RGB = RGB(170, 170, 170)
.TwoColorGradient msoGradientHorizontal, 1
End With