Как добавить новый ряд (Series) в Chart?
with (oChart.SeriesCollection(EmptyParam, lcid) as SeriesCollection).NewSeries do
begin
Values := oSheet.Range['H2', 'H6']; Name := '="Q4"'; end;
Также можно воспользоваться методом Extend, который "расширяет" область данных диаграммы.
NewSeries Method
Extend Method