[SGKorotkow]

нет, компиляция проходит нормально! без ошибок!
ошибка возникает при вызове процедур для закрытия и сохранения экселевского до-та!

открытие файла:
void __fastcall TForm1::ExcelOpenXSL(AnsiString XslFile)
{
if (XslFile!="")
{AppX = Variant::CreateObject("Excel.Application");
AppX.OlePropertyGet("WorkBooks").OleProcedure("Open",XslFile.c_str());
ShX=AppX.OlePropertyGet("WorkSheets",3);
}
else
{
ShowMessage("Не заполнено поле Служебка(xls)!");
}
if(!AppX.IsEmpty())AppX.OlePropertySet("Visible",true);

запись данных:
void __fastcall TForm1::toExcelCell(int Row,int Column, AnsiString data, Variant Sh)
{
try {
Variant cur = Sh.OlePropertyGet("Cells", Row,Column);
cur.OlePropertySet("Value", data.c_str());
} catch(...) { ; }

чтение данных:
Variant __fastcall TForm1::fromExcelCell(int Row, int Column, Variant Sh)
{
Variant result,cur;
cur = Sh.OlePropertyGet("Cells",Row,Column);
result = cur.OlePropertyGet("Value");
return result;
}