title: Run macro on Excel Graph when I select new data
body: <p>Like the title says, I want to be able to automatically run my macro whenever I select a series for the graph. 
  I need the last bar to be colored red, and I can do that with my macro, but when I select a new series of data, the red bar is the last bar of the previous data selection.  So if I have 4 values on the first selection, and I pick 7 values for the next selection, I end up having the 4th bar in red.</p>
  
  <p>This is the macro I use</p>
  
  <pre><code>Sub CustomChartMacro() 
  Application.ScreenUpdating = True 
  Dim w As Worksheet 
  Dim chtSeries As Excel.Series 
  Dim i As Long 
  Dim a As Long 
  
      'Call CustomChartMacro a = ActiveChart.SeriesCollection(1).Points.Count * ActiveChart.SeriesCollection.Count 
  
     For Each chtSeries In ActiveChart.SeriesCollection
  
  
       With chtSeries
              For i = a To .Points.Count
  
                  If .Values(i) = a Then
                      .Points(i).Interior.Color = RGB(204, 9, 47)
                  Else
                      .Points(i).Interior.Color = RGB(89, 89, 91)
                  End If
              Next i
  
  
      End With 
  
   Next chtSeries
  
   End Sub
  </code></pre>
  
  <p>Thank you for your suggestions.</p>