VBA：可以在图表中搜索和删除系列

Question

我正在寻找按名称在图表中查找系列然后删除此特定系列的可能性。

Answer 1

您可以遍历Series集合中的所有Chart.SeriesCollection，并将Series.Name与您要删除的名称进行比较。

Option Explicit

Sub DelChrtSerbyName()

Dim ChtObj As ChartObject
Dim Ser As Series
Dim SerNametoDel As String

SerNametoDel = "MySeriesName" ' change to the name of the series you want to delete

Set ChtObj = ActiveSheet.ChartObjects("Chart 1") ' modify to your chart's name

For Each Ser In ChtObj.Chart.SeriesCollection
    If Ser.Name = SerNametoDel Then
        Ser.delete
        Exit For
    End If
Next Ser

End Sub