Programming Excel with VBA and .NET

Name

chartfillformat.PresetGradient(Style, Variant, PresetGradientType)

Synopsis

Applies a built-in gradient.

Argument	Settings
Style	An msoGradientStyle constant indicating the type of the gradient. See the GradientStyle property for a list of settings.
Variant	The index of the gradient variant to use. The variants are listed on the Gradient tab in the Fill Effects dialog box.
PresetGradientType	An msoPresetGradientType constant indicating the built-in gradient to use. See the PresetGradientType property for a list of settings.

The following code applies a built-in gradient to the chart area:

Sub BuiltInGradient( )
    Dim chrt As Chart, cf As ChartFillFormat
    ' Get the chart.
    Set chrt = ActiveChart
    ' Get the chart area fill.
    Set cf = chrt.ChartArea.Fill
    ' Make the fill visible.
    cf.Visible = True
    ' Display a built-in gradient.
    cf.PresetGradient msoGradientDiagonalUp, 1, msoGradientBrass
End Sub