Clase LegendEntries (Word VBA)

Colección de todos los objetos LegendEntry en la leyenda de gráfico especificada. Para usar una variable de clase LegendEntries, primero debe ser instanciado, por ejemplo

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

For Each

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

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

Count

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

Dim lngCount As Long
lngCount = ActiveDocument.Background.Chart.Legend.LegendEntries.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.Legend.LegendEntries.Item(1). _ 
 Font.Italic = True 
 End If 
End With