Chart.SeriesCollection-Methode (Project)

Gibt ein Objekt zurück, das entweder eine Reihe (ein Series-Objekt ) oder eine Auflistung der Datenreihe (ein SeriesCollection-Objekt ) im Diagramm oder der Diagrammgruppe darstellt.

Syntax

Ausdruck. SeriesCollection (Index)

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

Parameter

Rückgabewert

Object

Beispiel

Um eine einzelne Reihe abzurufen, geben Sie den Index-Parameter an. Im folgenden Beispiel wird der erste Wert der Reihe "Tatsächliche Arbeit" ausgegeben. Der erste Aufruf der SeriesCollection-Methode ruft die Auflistung aller Datenreihen im Diagramm ab. Der zweite Aufruf der SeriesCollection-Methode ruft eine bestimmte Reihe ab.

Sub GetSeriesValue()
    Dim reportName As String
    Dim theReportIndex As Integer
    Dim theChart As Chart
    Dim seriesInChart As SeriesCollection
    Dim chartSeries As Series
    
    reportName = "Simple scalar chart"
        
    If (ActiveProject.Reports.IsPresent(reportName)) Then
        ' Make the report active.
        theReportIndex = ActiveProject.Reports(reportName).Index
        ActiveProject.Reports(theReportIndex).Apply
        
        Set theChart = ActiveProject.Reports(theReportIndex).Shapes(1).Chart
        Set seriesInChart = theChart.SeriesCollection
        
        If (seriesInChart.Count > 1) Then
            Set chartSeries = theChart.SeriesCollection("Actual Work")
            Debug.Print "Value of the Actual Work series, for task " & chartSeries.XValues(1) _
                & ": " & chartSeries.Values(1)
        End If
        
    End If
End Sub

Das Ausführen des Makros GetSeriesValue in einem Diagramm, das ein Diagramm der tatsächlichen Arbeit für Aufgaben enthält, könnte beispielsweise die folgende Ausgabe aufweisen: Value of the Actual Work series, for task T1: 16

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.