Classe LegendEntry (Excel VBA)

Cet objet représente une entrée de légende dans une légende de graphique.

Les procédures principales de la classe LegendEntry sont Delete et Select

Set

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

Dim lgne as LegendEntry
Set lgne = ActiveChart.Legend.LegendEntries(Index:=1)

Les procédures suivantes peuvent être utilisés pour définir des variables de la classe LegendEntry : Legend.LegendEntries et LegendEntries.Item

For Each

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

Dim lgneLegendEntrie As LegendEntry
For Each lgneLegendEntrie In ActiveChart.Legend.LegendEntries()
	
Next lgneLegendEntrie

Méthodes

Les méthodes principales de la classe LegendEntry sont

Delete - Cette méthode supprime l'objet.

ActiveChart.Legend.LegendEntries(1).Delete

Select - Cette méthode sélectionne l'objet.

ActiveChart.Legend.LegendEntries(1).Select

Autre Méthodes

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

Propriétés

LegendEntries.Count Cette propriété renvoie une valeur de type Long qui représente le nombre d’objets de la collection.

Dim lngCount As Long
lngCount = ActiveChart.Legend.LegendEntries.Count

LegendEntries.Parent Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Dim objParent As Object
Set objParent = ActiveChart.Legend.LegendEntries.Parent

Font Renvoie un objet font qui représente la police de l'objet spécifié.

Dim fntFont As Font
Set fntFont = ActiveChart.Legend.LegendEntries(1).Font

Format Renvoie l'objet ChartFormat . En lecture seule.

Dim cftFormatted As ChartFormat
Set cftFormatted = ActiveChart.Legend.LegendEntries(1).Format

Height Cette propriété renvoie une valeur de type double qui représente la hauteur de l'objet, exprimée en points.

Dim dblHeight As Double
dblHeight = ActiveChart.Legend.LegendEntries(1).Height

Index Cette propriété renvoie une valeur de type Long qui représente le numéro d'index de l'objet au sein de la collection d'objets similaires.

Dim lngIndex As Long
lngIndex = ActiveChart.Legend.LegendEntries(1).Index

Left Cette propriété renvoie une valeur de type double qui représente la distance en pointsentre le bord gauche de l'objet et le bord gauche de la zone de graphique.

Dim dblLeft As Double
dblLeft = ActiveChart.Legend.LegendEntries(1).Left

LegendKey Renvoie un objet LegendKey qui représente le symbole de légende associé à l'entrée.

Dim lkyLegendKey As LegendKey
Set lkyLegendKey = ActiveChart.Legend.LegendEntries(1).LegendKey

Parent Renvoie l’objet parent pour l’objet spécifié. En lecture seule.

Dim objParent As Object
Set objParent = ActiveChart.Legend.LegendEntries(1).Parent

Top Cette propriété renvoie une valeur de type double qui représente la distance en pointsentre le bord supérieur de l'objet et le haut de ligne 1 (dans une feuille de calcul) ou le haut de la zone de graphique (dans un graphique).

Dim dblTop As Double
dblTop = ActiveChart.Legend.LegendEntries(1).Top

Width Cette propriété renvoie une valeur de type double qui représente la largeur, exprimée en points, de l'objet.

Dim dblWidth As Double
dblWidth = ActiveChart.Legend.LegendEntries(1).Width