Shape.Fill Property

Syntax

expression.Fill

expression A variable that represents a Shape 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

See also:

• Shape Object
• Shape Object Members