Thursday, 30 December 2021

Removing blank series from an excel chart 

Dim chtob As ChartObject
  Dim seriesLine As Series
'''---removing blank series
  Set chtob = ActiveSheet.ChartObjects("Chart 2")
  For Each seriesLine In chtob.Chart.SeriesCollection
    seriesLine.IsFiltered = (seriesLine.Name = "")
  Next seriesLine  
Posted by at
Labels: ,

No comments:

Post a Comment

Subscribe to: Post Comments (Atom)