Clase LegendEntry (Word VBA)

La clase LegendEntry representa una entrada de leyenda de un gráfico.

Los principales procedimientos de la clase LegendEntry son Delete y Select

Set

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

Dim lgne as LegendEntry
Set lgne = ActiveDocument.Background.Chart.Legend.LegendEntries(Index:=1)

Los siguientes procedimientos se pueden usar para establecer variables de clase LegendEntry : Legend.LegendEntries y LegendEntries.Item

For Each

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

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

Temas

Los siguientes procedimientos de esta clase se han agrupado y se describen en una página temática separada

Format with its procedures Font y Format

Métodos

Los principales métodos de la clase LegendEntry son

Delete - Elimina el objeto.

ActiveDocument.Background.Chart.Legend.LegendEntries(1).Delete

Select - Selecciona el objeto.

ActiveDocument.Background.Chart.Legend.LegendEntries(1).Select

Propiedades

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

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

LegendEntries.Parent Devuelve al objeto primario del objeto especificado.

Dim objParent As Object
Set objParent = ActiveDocument.Background.Chart.Legend.LegendEntries.Parent

Height Devuelve el alto, en puntos, del objeto.

Dim dblHeight As Double
dblHeight = ActiveDocument.Background.Chart.Legend.LegendEntries(1).Height

Index Devuelve el número de índice del objeto contenido en el conjunto de objetos similares.

Dim lngIndex As Long
lngIndex = ActiveDocument.Background.Chart.Legend.LegendEntries(1).Index

Left Devuelve la distancia, en puntos, desde el borde izquierdo del objeto hasta el borde izquierdo del área del gráfico.

Dim dblLeft As Double
dblLeft = ActiveDocument.Background.Chart.Legend.LegendEntries(1).Left

LegendKey Devuelve la clave de leyenda asociada a la entrada.

Dim lkyLegendKey As LegendKey
Set lkyLegendKey = ActiveDocument.Background.Chart.Legend.LegendEntries(1).LegendKey

Parent Devuelve al objeto primario del objeto especificado.

Dim objParent As Object
Set objParent = ActiveDocument.Background.Chart.Legend.LegendEntries(1).Parent

Top Devuelve la distancia, en puntos, desde el borde superior del objeto hasta la parte superior de la primera fila (en una hoja de cálculo) o hasta la parte superior del área del gráfico (en un gráfico).

Dim dblTop As Double
dblTop = ActiveDocument.Background.Chart.Legend.LegendEntries(1).Top

Width Devuelve el ancho, en puntos, del objeto.

Dim dblWidth As Double
dblWidth = ActiveDocument.Background.Chart.Legend.LegendEntries(1).Width