안녕하세요..

저도 그거 땜시 꽤나 고생했거든요..
그래서 안타까운 맘에 글을 올립니다.
아래의 예제를 참조하시기 바랍니다.

//아래의 함수를 호출하기전에 아래와 같이
// 인자값으로 넘겨주는 값들을 설정해야겠죠..

   try
      // 엑셀을 실행
      Excel := CreateOLEObject('Excel.Application');
   except
     ShowMessage('Excel이 설치되어 있지 않습니다.');
             Exit;
   end;
    Excel.Visible := True;
   WorkBks := Excel.workBooks.Add(xlWBATWorksheet);

   WorkSheet := WorkBks.Worksheets.Item['Sheet1'];
//-----------------------------------------------------------


procedure TMm41040_F.XLChartDraw(ARange, WorkBks: OleVariant; ChartName:
   string);
var
   i, count, index: Integer;
   ActiveChart, ChartTypeName: OleVariant;
   XValue: string;
begin

   ActiveChart := WorkBks.Charts.Add;
   // ActiveChart.SeriesCollection.Clear;
   ActiveChart.SetSourceData(ARange);
   //ActiveChart.SeriesCollection.Add(ARange);
   //ActiveChart.SeriesCollection.Item[1].HasDataLabels := True;
   ActiveChart.Name := ChartName;

   //ActiveChart.HasTitle := False;
   ActiveChart.ChartType := xlLineMarkers;
   //ActiveChart.Axes(xlCategory, xlPrimary).HasTitle := False;
   //ActiveChart.Axes(xlValue, xlPrimary).HasTitle := False;

end;