Classe ChartCategory (Word VBA)

La classe ChartCategory représente toutes les catégories de graphique dans le document, si visibles (non filtré) ou non.

Set

Pour utiliser une variable de classe ChartCategory, elle doit d'abord être instanciée, par exemple

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

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe ChartCategory : ChartGroup.CategoryCollection et CategoryCollection.Item

For Each

Voici un exemple de traitement des éléments ChartCategory dans une collection

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

CategoryCollection.Count

Renvoie un type long qui représente le nombre de catégories dans la collection.

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

CategoryCollection.Item

Renvoie une catégorie de graphique individuelle.

Syntaxe : expression.Item (Index)

Index: Nom ou numéro d'index de l'objet.

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

CategoryCollection.Parent

Renvoie un Object qui représente l’objet parent de l’objet CategoryCollection spécifié.

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

IsFiltered

Cette propriété renvoie ou définit un type Boolean qui détermine si la catégorie de graphique spécifiée est filtrée à partir du graphique.

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

Name

Cette propriété renvoie ou définit une chaîne qui représente le nom d’une catégorie de graphique.

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

Parent

Renvoie un Object qui représente l'objet parent de l'objet ChartCategory spécifié.

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