Clase LegendEntry - una entrada de leyenda (PowerPoint VBA)

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

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

Dim lgne as LegendEntry
Set lgne = ActiveWindow.RangeFromPoint.Chart.Legend.LegendEntries(Index:=1)

Las variables de tipo LegendEntry se pueden establecer utilizando el procedimiento LegendEntries.Item

Delete

Elimina el objeto.

ActiveWindow.RangeFromPoint.Chart.Legend.LegendEntries(1).Delete

Font

Devuelve la fuente del objeto especificado. ChartFont de solo lectura.

Dim cftFont As ChartFont
Set cftFont = ActiveWindow.RangeFromPoint.Chart.Legend.LegendEntries(1).Font

Format

Devuelve la línea, relleno y efecto de formato para el objeto. ChartFormat de sólo lectura.

Dim cftFormatted As ChartFormat
Set cftFormatted = ActiveWindow.RangeFromPoint.Chart.Legend.LegendEntries(1).Format

Height

Devuelve el alto, en puntos, del objeto. Valor Doublede solo lectura.

Dim dblHeight As Double
dblHeight = ActiveWindow.RangeFromPoint.Chart.Legend.LegendEntries(1).Height

Index

Devuelve el número de índice del objeto contenido en el conjunto de objetos similares. Long de sólo lectura.

Dim lngIndex As Long
lngIndex = ActiveWindow.RangeFromPoint.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. Valor Doublede solo lectura.

Dim dblLeft As Double
dblLeft = ActiveWindow.RangeFromPoint.Chart.Legend.LegendEntries(1).Left

LegendKey

Devuelve la clave de leyenda asociada a la entrada. LegendKey de solo lectura.

Dim lkyLegendKey As LegendKey
Set lkyLegendKey = ActivePresentation.Slides(1).Shapes(1).Chart.Legend.LegendEntries(1).LegendKey

Select

Selecciona el objeto.

ActiveWindow.RangeFromPoint.Chart.Legend.LegendEntries(1).Select

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). Valor Doublede solo lectura.

Dim dblTop As Double
dblTop = ActiveWindow.RangeFromPoint.Chart.Legend.LegendEntries(1).Top

Width

Devuelve el ancho, en puntos, del objeto. Valor Doublede solo lectura.

Dim dblWidth As Double
dblWidth = ActiveWindow.RangeFromPoint.Chart.Legend.LegendEntries(1).Width