Compartilhar via


SeriesCollection.Add Method

Excel Developer Reference

Adds one or more new series to the SeriesCollection collection.

Syntax

expression.Add(Source, Rowcol, SeriesLabels, CategoryLabels, Replace)

expression   A variable that represents a SeriesCollection object.

Parameters

Name Required/Optional Data Type Description
Source Required Variant The new data as a Range object.
Rowcol Optional XlRowCol . Specifies whether the new values are in the rows or columns of the specified range.
SeriesLabels Optional Variant True if the first row or column contains the name of the data series. False if the first row or column contains the first data point of the series. If this argument is omitted, Microsoft Excel attempts to determine the location of the series name from the contents of the first row or column.
CategoryLabels Optional Variant True if the first row or column contains the name of the category labels. False if the first row or column contains the first data point of the series. If this argument is omitted, Microsoft Excel attempts to determine the location of the category label from the contents of the first row or column.
Replace Optional Variant If CategoryLabels is True and Replace is True, the specified categories replace the categories that currently exist for the series. If Replace is False, the existing categories will not be replaced. The default value is False.

Return Value
A Series object that represents the new series.

Remarks

This method does not actually return a Series object as stated in the Object Browser. This method is not available for PivotChart reports.

Example

This example creates a new series in Chart1. The data source for the new series is range B1:B10 on Sheet1.

Visual Basic for Applications
  Charts("Chart1").SeriesCollection.Add _
    Source:=ActiveWorkbook.Worksheets("Sheet1").Range("B1:B10")

This example creates a new series on the embedded chart on Sheet1.

Visual Basic for Applications
  Worksheets("Sheet1").ChartObjects(1).Activate
ActiveChart.SeriesCollection.Add _
    Source:=Worksheets("Sheet1").Range("B1:B10")

See Also