Clase ChartCategory (Word VBA)

La clase ChartCategory representa todas las categorías de gráfico en el documento, si visible (sin filtrar) o no.

Set

Para usar una variable de clase ChartCategory, primero debe ser instanciado, por ejemplo

Dim chrc as ChartCategory
Set chrc = ActiveDocument.Background.Chart.ChartGroups(1).CategoryCollection(Index:=1)

Los siguientes procedimientos se pueden usar para establecer variables de clase ChartCategory : ChartGroup.CategoryCollection y CategoryCollection.Item

For Each

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

Dim chrcCategoryCollection As ChartCategory
For Each chrcCategoryCollection In ActiveDocument.Background.Chart.ChartGroups(1).CategoryCollection()
	
Next chrcCategoryCollection

CategoryCollection.Count

Devuelve un Long que representa el número de categorías de la colección.

Dim lngCount As Long
lngCount = ActiveDocument.Background.Chart.ChartGroups(1).CategoryCollection.Count

CategoryCollection.Item

Devuelve una categoría de gráfico individual.

Sintaxis : expression.Item (Index)

Index: Número de índice o nombre del objeto.

Dim chrcCategoryCollection As ChartCategory
Set chrcCategoryCollection = ActiveDocument.Background.Chart.ChartGroups(1).CategoryCollection(Index:=1)

CategoryCollection.Parent

Devuelve un objeto Object que representa el objeto primario del objeto CategoryCollection especificado.

Dim objParent As Object
Set objParent = ActiveDocument.Background.Chart.ChartGroups(1).CategoryCollection.Parent

IsFiltered

Devuelve o establece un valor de tipo Boolean que determina si la categoría del gráfico especificado se filtra desde el gráfico.

ActiveDocument.Background.Chart.ChartGroups(1).CategoryCollection(1).IsFiltered = True

Name

Devuelve o establece una cadena que representa el nombre de una categoría de gráfico.

Dim strName As String
strName = ActiveDocument.Background.Chart.ChartGroups(1).CategoryCollection(1).Name

Parent

Devuelve un objeto Object que representa el objeto primario del objeto ChartCategory especificado.

Dim objParent As Object
Set objParent = ActiveDocument.Background.Chart.ChartGroups(1).CategoryCollection(1).Parent