Nota:
El acceso a esta página requiere autorización. Puede intentar iniciar sesión o cambiar directorios.
El acceso a esta página requiere autorización. Puede intentar cambiar los directorios.
Obtiene un objeto Office.IMsoLegend que representa la leyenda de un gráfico. IMsoLegend de solo lectura.
Sintaxis
más sencilla.Leyenda
expresión Una variable que representa un objeto Chart.
Ejemplo
En el ejemplo siguiente se activa la leyenda del gráfico y, a continuación, se establece la parte superior de la leyenda 20 puntos por debajo de lo que se estableció anteriormente.
Sub SetLegendTop()
Dim chartShape As Shape
Dim reportName As String
Dim legendTop As Double
reportName = "Simple scalar chart"
Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
chartShape.Chart.HasLegend = True
legendTop = chartShape.Chart.Legend.Top
chartShape.Chart.Legend.Top = legendTop + 20
End Sub
Valor de propiedad
IMSOLEYENDA
Vea también
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.