Скопировать с tchart в excel

В смысле картинку, или данные?

Данные(или график), который на картинке. Только еще одна проблема - как вставить в excel с определенной ячейки?
Пробовал через CopyToClipboardMetafile(true) но:
1) Вставлять придется вручную
2) Вставить надо в определенное место в excel

Попробовал так. Почти получилось. Выдается ошибка (см. рис.) - Не знает что такое ShapeRange. Либо инклуд какой-н. не включил, либо что то еще. Подскажите в чем проблема.
А вобще хочу сделать так, чтобы вставлялся большой рисунок по размеру и потом сжимать его на месте. Потому что если делать на tcharte маленький, некрасиво получается.
Вот код:

try
{
//iStartExcel - ф-я открытия дока
if(iStartExcel("C:\\1.xls")) return;
vVarSheet.OlePropertyGet("Shapes").OleFunction("AddPicture",
"c:\\1.bmp",false,true,vVarSheet.OlePropertyGet
("Range","A5").OlePropertyGet("Left"),
vVarSheet.OlePropertyGet("Range","A5").OlePropertyGet("Top"),-1,-1);
vVarSheet.OlePropertyGet("Pictures","Picture 1");
Variant v=vVarApp.OlePropertyGet("Selection");
v.OlePropertyGet("ShapeRange").OleFunction("IncrementLeft",-177.75);
// v.OlePropertyGet("ShapeRange").OleFunction("IncrementTop",100);
// v.OlePropertyGet("ShapeRange").OleFunction("IncrementRotation",-90);
}catch(...)
{
}
iStopExcel(1,"C:\\1.xls");
Close();

ps. я бы ввёл временную переменную Variant varA5 = vVarSheet.OlePropertyGet("Range","A5"). Хоть на три миллисекунды -- а быстрее.

Так все-таки, как можно сжать рисунок? Пробовал через ScaleWidth - ругается, мол "Недопустимое число параметров"

vVarShape.OleFunction("ScaleWidth",50);