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 Typ des Layouts an, bei dem der Wert einem Schnelllayoutelement im Menüband entspricht.
varChartType Optional Variant Dies kann eine der Office.XlChartType-Konstanten sein.
Layout Erforderlich INT32
varChartType Optional Variant

Rückgabewert

Nothing

HinwBemerkungeneise

Wenn Sie ein Diagramm in einem Bericht auswählen, befindet sich die Dropdownliste Schnelllayout auf der Registerkarte ENTWURF unter 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 Layout-Parameter 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. Die ApplyLayout-Methode fügt nur die Liniendiagrammelemente hinzu, die auch für den Spaltendiagrammtyp verfügbar sind.

Beispiel

Im folgenden Beispiel wird die Schnelllayoutelementnummer 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.