Excel диаграмма на лист Location

[funball]

Здравствуйте!
Не знаю почему, но не могу реализовать простую вещь - создать диаграмму и перенести ее на лист в Excel-ле, который создан до созданиядиаграммы, вылезает все время шибка -OLE error 800A03EC.
Варианты которые пробовал:

XL:=CreateOLEObject('Excel.Application');

1***
chart_1:=XL.charts.add;
chart_1.ChartArea.Select;
chart_1.Location(where:=xlLocationAsObject,name:='Итоговые данные'); 

2***
chart_1:=XL.charts.add;
chart_1.ChartArea.Select;
chart_1.Location(xlLocationAsObject,'Итоговые данные'); 

3***
XL.VBE.ActiveVBProject.VBComponents.Import('e:\1\Module1.txt');
XL.Run('Mac1');
где в Module1.txt:
Sub Mac1()
    Sheets("Диаграмма VOLUME_BYTE").Select
    ActiveChart.ChartArea.Select
    ActiveChart.Location Where:=xlLocationAsObject, Name:="Итоговые данные"
End Sub

4***
XL.Sheets[Диаграмма VOLUME_BYTE].Select;
XL.Sheets[Диаграмма VOLUME_BYTE].ChartArea.Select;
XL.Sheets[Диаграмма VOLUME_BYTE].Location(where:=xlLocationAsObject,name:='Итоговые данные');

---------------------------------
Просьба помочь, что не так? Пришлите пример кода, кто реализовывал такое.
Спасибо.

[funball]

Переместили мою тему в Excel....а мне нужно чтобы люди помогли с примером кода в Delphi при формировании Excel отчета. Код добавления диаграммы(charts) на лист.
В макросе код следующий:

Sub Mac1()
    Sheets("Диаграмма VOLUME_BYTE").Select
    ActiveChart.ChartArea.Select
    ActiveChart.Location Where:=xlLocationAsObject, Name:="Итоговые данные"
End Sub

а в Delphi как?...с вариантами указанными в первом сообщении возникает ошибка.

[funball]

Проблема решена.
Все работает из 1***, ошибка далее по коду в программе.