GradientVariant Property

expression.GradientVariant

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

Example

This example sets the chart's fill format so that it's displayed using the second shade variant if it's currently using the first shade variant.

With myChart.ChartArea.Fill
    If .Type = msoFillGradient Then
        If .GradientColorType = msoGradientOneColor Then
            If .GradientVariant = 1 Then
                .OneColorGradient .GradientStyle, 2, _
                    .GradientDegree
            End If
        End If
    End If
End With