Find and Replace will not work on the charts Series formula.

You would need code to alter the series formula directly, so something like

activechart.SeriesCollection(1).formula=replace(activechart.SeriesCollection(1).formula,"$B$","$C$")