Programming Excel with VBA and .NET

Name

chartfillformat.PresetTextured(PresetTexture)

Synopsis

Applies a built-in texture.

Argument	Settings
PresetTexture	An msoPresetTexture constant indicating the built-in texture to use. See the PresetTexture property for a list of settings.

The following code applies the white marble texture to a chart area:

Sub ApplyTexture( )
    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 texture.
    cf.PresetTextured msoTextureWhiteMarble
End Sub