True if Microsoft Word assigns a different color or pattern to each data marker. Read/write Boolean.
expression. VaryByCategories
expression A variable that represents a ChartGroup object.
The chart must contain only one series.
Note Although the following code applies to Microsoft Word, you can readily modify it to apply to PowerPoint.
The following example assigns a different color or pattern to each data marker in chart group one. You should run the example on a 2-D line chart that has data markers on a series.
With ActiveDocument.InlineShapes(1)
If .HasChart Then
.Chart.ChartGroups(1).VaryByCategories = True
End If
End With