TintAndShade Property [Excel 2003 VBA Language Reference]

Returns or sets a Single that lightens or darkens the color of a specified shape. Read/write.

expression.TintAndShade

expression Required. An expression that returns one of the objects in the Applies To list.

Remarks

You can enter a number from -1 (darkest) to 1 (lightest) for the TintAndShade property, 0 (zero) being neutral.

Example

This example creates a new shape in the active document, sets the fill color, and lightens the color shade.

Sub PrinterPlate()

    Dim s As Shape

    Set s = ActiveSheet.Shapes.AddShape( _
        Type:=msoShapeHeart, Left:=150, _
        Top:=150, Width:=250, Height:=250)

    With s.Fill.ForeColor
        .SchemeColor = 12
        .TintAndShade = 0.8
    End With

End Sub

Applies to | ColorFormat Object