title | keywords | f1_keywords | api_name | ms.assetid | ms.date | ms.localizationpriority | ||
---|---|---|---|---|---|---|---|---|
ChartGroup.Has3DShading property (PowerPoint) |
vbapp10.chm692005 |
|
|
6276bf7a-9d21-9eda-6ad9-6153c9a74948 |
06/08/2017 |
medium |
True if a chart group has three-dimensional shading. Read/write Boolean.
expression.Has3DShading
expression A variable that represents a ChartGroup object.
Setting Has3DShading to False removes the 3D shading effect from the chart (rendering it as flat). Setting Has3DShading to True sets the chart content to the default.
Note
Although the following code applies to Microsoft Word, you can readily modify it to apply to PowerPoint.
The following example adds 3D shading to the first chart group of the first chart in the active document.
With ActiveDocument.InlineShapes(1)
If .HasChart Then
.Chart.ChartGroups(1).Has3DShading = True
End If
End With
[!includeSupport and feedback]