Classe LegendEntries (Word VBA)

Collection de tous les objets LegendEntry de la légende de graphique spécifiée. Pour utiliser une variable de classe LegendEntries, elle doit d'abord être instanciée, par exemple

Dim les as LegendEntries
Set les = ActiveDocument.Background.Chart.Legend.LegendEntries()

For Each

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

Dim lgne As LegendEntry
For Each lgne In ActiveDocument.Background.Chart.Legend.LegendEntries()
	
Next lgne

Count

Renvoie le nombre d'objets dans la collection.

Dim lngCount As Long
lngCount = ActiveDocument.Background.Chart.Legend.LegendEntries.Count

Item

Cette méthode renvoie un seul objet d'une collection.

Item (Index)

Index: Numéro d'index de l'objet.

With ActiveDocument.InlineShapes(1) 
 If .HasChart Then 
 .Chart.Legend.LegendEntries.Item(1). _ 
 Font.Italic = True 
 End If 
End With