Compartir por


Objeto LegendEntries (PowerPoint)

Colección de todos los objetos LegendEntry en la leyenda de gráfico especificada.

Observaciones

Cada entrada de leyenda tiene dos partes:

  • El texto de la entrada, que corresponde al nombre de la serie o línea de tendencia asociada con la entrada de leyenda.

  • El marcador de entrada, que vincula visualmente la entrada de leyenda con la serie o línea de tendencia asociada a ella en el gráfico.

Las propiedades de formato del marcador de entrada y su serie o línea de tendencia correspondiente están contenidas en el objeto LegendKey.

Ejemplo

Nota:

[!NOTA] Si bien el siguiente código se aplica a Microsoft Word, puede modificarlo para que se aplique a PowerPoint.

Use el método LegendEntries para devolver la colección LegendEntries. En el siguiente ejemplo se recorre la colección de entradas de leyenda para el primer gráfico del documento activo y se cambia su color de fuente.

With ActiveDocument.InlineShapes(1)

    If .HasChart Then

        With .Chart.Legend

            For i = 1 To .LegendEntries.Count

                .LegendEntries(i).Font.ColorIndex = 5

            Next

        End With

    End If

End With


Nota:

[!NOTA] Si bien el siguiente código se aplica a Microsoft Word, puede modificarlo para que se aplique a PowerPoint.

Use LegendEntries (index), donde index es el número de índice de entrada de leyenda, para devolver un único objeto LegendEntry . No se puede devolver las entradas de leyenda por nombre.

El número de índice representa la posición de la entrada en la leyenda. LegendEntries(1) está en la parte superior de la leyenda; LegendEntries(LegendEntries.Count) está en la parte inferior. En el siguiente ejemplo, se cambia a cursiva el estilo de fuente del texto de la entrada de leyenda que está en la parte superior de la leyenda (suele ser la leyenda de la serie uno) para el primer gráfico del documento activo.

With ActiveDocument.InlineShapes(1)

    If .HasChart Then

        .Chart.Legend.LegendEntries(1).Font.Italic = True

    End If

End With


Vea también

Referencia del modelo de objetos de PowerPoint

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.