PresetGradient Method

Applies To

ChartFillFormat object, FillFormat object.

Description

Sets the specified fill to a preset gradient.

Syntax

expression.PresetGradient(GradientStyle, Variant, PresetGradientType)

expression Required. An expression that returns a FillFormat object.

GradientStyle Required Long. The gradient style. Can be one of the following MsoGradientStyle constants: msoGradientDiagonalDown, msoGradientDiagonalUp, msoGradientFromCenter, msoGradientFromCorner, msoGradientHorizontal, or msoGradientVertical.

Variant Required Long. The gradient variant. Can be a value from 1 through 4, corresponding to one of the four variants on the Gradient tab in the Fill Effects dialog box. If GradientStyle is msoGradientFromCenter, the Variant argument can only be 1 or 2.

PresetGradientType Required Long. The gradient type. Can be one of the following MsoPresetGradientType constants:

  • msoGradientBrass
  • msoGradientCalmWater
  • msoGradientChrome
  • msoGradientChromeII
  • msoGradientDaybreak
  • msoGradientDesert
  • msoGradientEarlySunset
  • msoGradientFire
  • msoGradientFog
  • msoGradientGold
  • msoGradientGoldII
  • msoGradientHorizon
  • msoGradientLateSunset
  • msoGradientMahogany
  • msoGradientMoss
  • msoGradientNightfall
  • msoGradientOcean
  • msoGradientParchment
  • msoGradientPeacock
  • msoGradientRainbow
  • msoGradientRainbowII
  • msoGradientSapphire
  • msoGradientSilver
  • msoGradientWheat
  • msoPresetGradientMixed

Example

This example sets the fill format for chart two to the same style used for chart one.

Set c1f = Charts(1).ChartArea.Fill
If c1f.Type = msoFillGradient Then
    With Charts(2).ChartArea.Fill
        .Visible = True
        .PresetGradient c1f.GradientStyle, _
            c1f.GradientVariant, c1f.PresetGradientType
    End With
End If