PowerPoint) (SeriesCollection 物件
代表特定圖表或圖表群組中之所有 Series 物件的集合。
註解
使用 SeriesCollection 方法可傳回 SeriesCollection 集合。
範例
注意事項
[!注意事項] 雖然下列程式碼適用於 Microsoft Word，但是您可以輕易對其進行修改以套用至 PowerPoint。
使用 Extend 方法可延伸現有數列。 下列範例會將圖表之工作表中儲存格 C6:C10 的資料新增至圖表之數列集合中的現有數列。
With ActiveDocument.InlineShapes(1)
If .HasChart Then
.Chart.SeriesCollection.Extend "='Sheet1'!$C$6:$C$10"
End If
End With
注意事項
[!注意事項] 雖然下列程式碼適用於 Microsoft Word，但是您可以輕易對其進行修改以套用至 PowerPoint。
使用 Add 方法可建立新的數列，並將其新增到圖表中。 下列範例會將圖表之工作表中儲存格 D1:D5 的資料當做新數列新增至圖表。
With ActiveDocument.InlineShapes(1)
If .HasChart Then
.Chart.SeriesCollection.Add "='Sheet1'!$D$1:$D$5"
End If
End With
注意事項
[!注意事項] 雖然下列程式碼適用於 Microsoft Word，但是您可以輕易對其進行修改以套用至 PowerPoint。
使用 SeriesCollection (index) 可傳回單一 Series 物件，其中 index 是數列的索引編號或名稱。 下列範例會設定第一個數列的內景色彩第一個內嵌圖表中將使用中文件。
With ActiveDocument.InlineShapes(1)
If .HasChart Then
.Chart.SeriesCollection(1).Interior.Color = RGB(255, 0, 0)
End If
End With
方法
| 名稱 |
|---|
| Add |
| Extend |
| 項目 |
| NewSeries |
屬性
| 名稱 |
|---|
| Application |
| 數目 |
| Creator |
| Parent |
另請參閱
支援和意見反應
有關於 Office VBA 或這份文件的問題或意見反應嗎？ 如需取得支援服務並提供意見反應的相關指導，請參閱 Office VBA 支援與意見反應。