OLE-сервер Excel. Builder c++

//создание объекта Excel.Application
 if(!fStart)
 {
  try
   {
     vVarApp=CreateOleObject("Excel.Application");
     fStart=true;
   }
  catch(...)
   {
     MessageBox(0, "Ошибка при открытии сервера Excel", "Ошибка", MB_OK);
     return;
   }
 }
 //установка свойства
 vVarApp.OlePropertySet("Visible",true);
 
 //Переменной vVarBooks присваивается значение Workbooks - свойство
 //объекта Excel.Application, содержащее набор рабочих книг Excel.
 vVarBooks=vVarApp.OlePropertyGet("Workbooks");
 
 //SheetsInNewWorkbook задает количество листов в создаваемой книге,
 //пусть в первой книге их будет 4(Кстати по умолчанию тоже создается
 //книга, содержащая 3 листа)
 vVarApp.OlePropertySet("SheetsInNewWorkbook",4);
 
 //Добавляем книгу из 4 листов в объект vVarBooks.
 vVarBooks.OleProcedure("Add");
 
 //Переменная vVarBook содержит ссылку на текущую книгу.
 //(Пусть текущая книга будет первая).
 vVarBook=vVarBooks.OlePropertyGet("Item",1);
 
 //Переменной vVarSheets присваиваем значение
 //Worksheets - свойство объекта Excel.Application,
 //содержащее набор страниц книги Excel.
 vVarSheets=vVarBook.OlePropertyGet("Worksheets");
 
//СОЗДАНИЕ ЗАГОЛОВКА
   //выбираем группу ячеек (для объединения)
   vVarCell=vVarSheet.OlePropertyGet("Range","B2:C2");
   vVarCell.OleProcedure("Merge");
 
   //устанавливаем режим выравнивания текста в ячейке (ячейках) по центру
   vVarCell.OlePropertySet("HorizontalAlignment",-4108);
   vVarCell.OlePropertySet("VerticalAlignment",-4108);
 
   //устанавливаем размер шрифта
   vVarCell.OlePropertyGet("Font").OlePropertySet("Size",16);
 
   //устанавливаем цвет шрифта ячейки
   vVarCell.OlePropertyGet("Font").OlePropertySet("Color",clRed);
 
   //устанавливаем стиль шрифта ячейки (жирный)
   vVarCell.OlePropertyGet("Font").OlePropertySet("Bold",true);
 
   //устанавливаем имя шрифта ячейки
   vVarCell.OlePropertyGet("Font").OlePropertySet("Name","Times New Roman");
 
   //устанавливаем заливку ячейки (цвет)
   vVarCell.OlePropertyGet("Interior").OlePropertySet("ColorIndex",15);
 
   //устанавливаем значение данных
   vVarCell.OlePropertySet("Value","Продажа техники за неделю");

private:    // User declarations
Variant  vVarApp,  //приложение
         vVarBooks, //набор книг
         vVarBook, // книга
         vVarSheets,//набор страниц
         vVarSheet, //страница
         vVarCells,//ячейки
         vVarCell; //ячейка
bool     fStart; // служит индикатором того, что сервер запущен

vVarCell.OlePropertySet("WrapText", true);