True if the chart group has three-dimensional shading. This property only applies to surface charts and will return a run-time error if you try to set it to a non-surface chart. Read/write Boolean.
Example
This example adds three-dimensional shading to a chart group.
Charts(1).ChartGroups(1).Has3DShading = True