Excel VisualBasic Script

  1. Home
  2. VisualBasic Script
  3. Excel
  4. Determining a charts source data
Sub Test1()
    Dim DataRange As range
    Set DataRange = ActiveSheet.range("A1:A2")
    ActiveSheet.ChartObjects(1).Chart.SeriesCollection(1).Values = DataRange
End Sub