Открыть файл xlsx (2007), обработать информацию и сохранить в аналогичный файл. Какие библиотеки использовать?

#import "C:\\Program Files (x86)\\Common Files\\Microsoft Shared\\OFFICE14\\MSO.DLL" auto_rename no_namespace
#import "C:\\Program Files (x86)\\Common Files\\Microsoft Shared\\VBA\\VBA6\\VBE6EXT.OLB" auto_rename no_namespace
#import "C:\\Program Files (x86)\\Microsoft Office\\Office14\\EXCEL.EXE" auto_rename

HRESULT hRes = E_FAIL;  
 
            CoInitialize(NULL);
 
            Excel::_ApplicationPtr pApp;
    
        hRes = pApp.CreateInstance("Excel.Application");
    
    if ( FAILED(hRes) )     
    {
        MessageBox(NULL, L"Excel не найден!", L"Ошибка", MB_OK);  
 
        return 1;
    }

OldBook = pApp->Workbooks->Open(PathFile,0);//открыть книгу

OldBook = pApp->Workbooks->Open("C:\\My Excel.xlsx");//открыть книгу

    pApp->PutDisplayAlerts(0,FALSE);//отключить уведомления
    pApp->PutEnableEvents(FALSE);//отключить реакцию на события
    pApp->PutScreenUpdating(0,FALSE)

OldBook->Save(0);

Excel::_WorkbookPtr NewBook;//указатель на новую книгу 
 
        NewBook = pApp->Workbooks->Add();//добавить 
 
            Excel::_WorksheetPtr NewSheet;//указатель на листы в книге
                
                NewBook->Worksheets->Add(vtMissing,vtMissing,1,xlWorksheet,0);//добавить 2 листа в новую книгу
 
                        Excel::RangePtr NewCell;

NewBook->SaveAs(PathFile+"\\"+"Correct"+" "+FileName,Excel::xlAddIn8 , &vtMissing, &vtMissing, &vtMissing, &vtMissing, Excel::xlNoChange);

int NonEmptyRow( Excel::_WorksheetPtr Sheet, int Col )
{
    Excel::RangePtr NonEmptyRow;
        NonEmptyRow = Sheet->Cells->Item[Sheet->Rows->Count][Col];
    return NonEmptyRow->GetEnd(Excel::xlUp)->Row;

wchar_t *get_value( Excel::_WorksheetPtr Sheet, int Row, int Col )//row строка col столбец
{
    Excel::RangePtr Cell;
    int len;
    Cell = Sheet->Cells->Item[Row][Col];
        len = wcslen(Cell->Text.bstrVal) + 1;
            wchar_t *res = (wchar_t *)malloc(sizeof(wchar_t) * len);
            wcscpy(res, Cell->Text.bstrVal);
        return res; 
}

for (i = 1; i <= MaxCount/*макс.количество строк с данными*/; i++)
        {
        wcscpy(buff,get_value(OldSheet,i,2));//чтение по 2 столбцу,i - ой строке
}

NewCell = NewSheet->Cells->Item[i][j];//выбрать ячейку для записи,где i - строка,j - столбец 
NewCell->Value2 = buff

CoInitialize(NULL);
CLSID clsid;
hr = CLSIDFromProgID(L"Excel.Application", &clsid);
if(FAILED(hr)) {
    MessageBox(NULL, "Excel не найден", "Error", 0x10010);
    exit(1);
};
 
IDispatch *pExcelApp;
hr = CoCreateInstance(clsid, NULL, CLSCTX_LOCAL_SERVER, IID_IDispatch, (void **)&pExcelApp);
if(FAILED(hr)) {
    MessageBox(NULL, "Excel не зарегистрирован корректно", "Error", 0x10010);
    exit(2);
}