Chart.ApplyLayout-Methode (Project)

Wendet das angegebene Diagrammlayout und den angegebenen Diagrammtyp auf ein ausgewähltes Diagramm an.

Syntax

Ausdruck. ApplyLayout (Layout,varChartType)

Ausdruck: Eine Variable, die ein Chart-Objekt darstellt.

Parameter

Name	Erforderlich/Optional	Datentyp	Beschreibung
Layout	Erforderlich	Long	Gibt den Layouttyp an, bei dem der Wert einem Schnelllayoutelement im Menüband entspricht.
varChartType	Optional	Variant	Kann eine der Office.XlChartType-Konstanten sein.
Layout	Erforderlich	INT32
varChartType	Optional	Variant

Rückgabewert

Nothing

Hinweise

Wenn Sie in einem Bericht ein Diagramm auswählen, befindet sich die Dropdownliste "Schnelllayout " auf der Registerkarte "ENTWURF " unter den DIAGRAMMTOOLS im Menüband. Sie können den Diagrammtyp manuell ändern, indem Sie den Befehl Diagrammtyp ändern auf derselben Registerkarte des Menübands verwenden.

Wenn Sie ein Layout für den aktuellen Diagrammtyp verwenden, ist der Layoutparameter auf die Anzahl der Elemente in der Dropdownliste Schnelllayout beschränkt. Verwenden Sie den varChartType-Parameter , um das Layout eines anderen Diagrammtyps auf das aktuelle Diagramm anzuwenden. Beispielsweise können Sie die Layouts, die für ein Liniendiagramm verfügbar sind, auf ein Säulendiagramm anwenden. Mit der ApplyLayout-Methode werden nur die Liniendiagrammelemente hinzugefügt, die auch für den Säulendiagrammtyp verfügbar sind.

Beispiel

Im folgenden Beispiel wird das Schnelllayoutelement Nummer 12 aus einem Liniendiagramm auf das ausgewählte Diagramm angewendet.

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

Siehe auch

Chart-Objekt

Support und Feedback

Haben Sie Fragen oder Feedback zu Office VBA oder zu dieser Dokumentation? Unter Office VBA-Support und Feedback finden Sie Hilfestellung zu den Möglichkeiten, wie Sie Support erhalten und Feedback abgeben können.