Изменить данные в ячейке файла EXCEL - C/C++ - Ответ 4917340

void CExcelTestDlg::OnBnClickedTest()
{
    
    if(!app.CreateDispatch(_T("Excel.Application"))) //запустить сервер
    {
        AfxMessageBox(_T("Ошибка при старте Excel!"));
        return;
    }
    else
        app.put_Visible(TRUE); //и сделать его видимым
    
    CWorkbooks oBooks;
    CWorkbook oBook;
 
    COleVariant  covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    COleVariant covTrue((short)TRUE, VT_BOOL), covFalse((short)FALSE, VT_BOOL);
    COleVariant covBOOL((short)FALSE, VT_BOOL);
 
    //наша коллекция раБочиХ книг
    oBooks = app.get_Workbooks();
    //добавить к ней новую книгу с шаблоном по умолчанию  
    oBooks.Add(covOptional);    //для Office XP
    //и получить его как экзепляр коллекции с номером 1
    oBook = oBooks.get_Item(COleVariant(long(1)));
    //активизировать документ 
    oBook.Activate();
    
 
 
    CWorksheets oSheets;
    CWorksheet oSheet;
 
 
    //наша коллекция рабочих листов
    oSheets = oBook.get_Worksheets();   
    // добавить еще один рабочий лист (добавляем в начало, 1 лист, тип "Рабочий лист")
    oSheet = oSheets.Add(covOptional,covOptional,
        COleVariant(long(1)),COleVariant(long(xlWorksheet)));   //для Office XP      
    //активизировать лист
    oSheet.put_Name(_T("Мой рабочий лист"));
    oSheet.Activate();
 
 
 
 
 
 
    CRange oRange1; 
    
    oRange1 = oSheet.get_Range(COleVariant(_T("J18")),COleVariant(_T("J18")));
    oRange1.put_Value2(COleVariant(_T("Тест")));
 
 
}