TintAndShade Property

Microsoft PowerPoint Visual Basic

TintAndShade Property

       

Returns a Single that represents the lightening or darkening of the 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 value 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 shpHeart As Shape

    Set shpHeart = ActivePresentation.Slides(1).Shapes _
        .AddShape(Type:=msoShapeHeart, Left:=150, _
        Top:=150, Width:=250, Height:=250)

    With shpHeart.Fill.ForeColor
        .CMYK = 16111872
        .TintAndShade = 0.3
        .OverPrint = msoTrue
        .Ink(Index:=1) = 0
        .Ink(Index:=2) = 1
        .Ink(Index:=3) = 1
        .Ink(Index:=4) = 0
    End With
End Sub