Clase ChartGroups - series trazadas en un gráfico (Word VBA)

La clase ChartGroups representa una o varias series trazadas en un gráfico empleando el mismo formato. Para usar una variable de clase ChartGroups, primero debe ser instanciado, por ejemplo

Dim cgs as ChartGroups
Set cgs = ActiveDocument.Background.Chart.ChartGroups

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos ChartGroups en una colección.

Dim chrg As ChartGroup
For Each chrg In ActiveDocument.Background.Chart.ChartGroups
	
Next chrg

Count

Devuelve el número de objetos de la colección.

Dim lngCount As Long
lngCount = ActiveDocument.Background.Chart.ChartGroups.Count

Item

Devuelve un solo objeto de una colección.

Item (Index)

Index: Número de índice del objeto.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 .Chart.ChartGroups.Item(1).HasDropLines = True 
 End If 
End With