Método Chart.ApplyLayout (Project)

Aplica el diseño y el tipo de gráfico especificados a un gráfico seleccionado.

Sintaxis

expresión. ApplyLayout (Layout,varChartType)

expresión Una variable que representa un objeto Chart.

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
Layout	Obligatorio	Long	Especifica el tipo de diseño, donde el valor corresponde a un elemento Diseño rápido en la cinta de opciones.
varChartType	Opcional	Variant	Puede ser una de las constantes Office.XlChartType .
Layout	Obligatorio	INT32
varChartType	Opcional	Variant

Valor devuelto

Nothing

Observaciones

Al seleccionar un gráfico en un informe, la lista desplegable Diseño rápido se encuentra en la pestaña DISEÑO en HERRAMIENTAS DE GRÁFICO en la cinta de opciones. Puede cambiar manualmente el tipo de gráfico mediante el comando Cambiar tipo de gráfico en la misma pestaña de la cinta de opciones.

Cuando se usa un diseño en el tipo de gráfico actual, el parámetro Layout se limita al número de elementos de la lista desplegable Diseño rápido . Use el parámetro varChartType para aplicar el diseño de un tipo de gráfico diferente en el gráfico actual. Por ejemplo, puede aplicar los diseños disponibles en un gráfico de líneas a un gráfico de columnas. El método ApplyLayout agrega solo los elementos de gráfico de líneas que también están disponibles para el tipo de gráfico de columnas.

Ejemplo

En el ejemplo siguiente se aplica el número de elemento Diseño rápido 12 de un gráfico de líneas al gráfico seleccionado.

Sub SetChartLayout()
    Dim chartShape As Shape
    Dim reportName As String
    
    reportName = "Simple scalar chart"
    Set chartShape = ActiveProject.Reports(reportName).Shapes(1)
    
    chartShape.Chart.ApplyLayout Layout:=12, varChartType:=Office.XlChartType.xlLine
End Sub

Vea también

Objeto Chart

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.