April 2006
Beginner
1114 pages
98h 16m
English
chartfillformat.Solid( )
Applies a solid color, removing any patterns, textures, or gradients. The following code resets the chart area to solid white:
Sub ResetFill( )
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 solid color.
cf.Solid
' Set the color to white
cf.ForeColor.SchemeColor = 2
End SubRead now
Unlock full access