Вот так можно считать ячейку а1 из экселя. Примерно, так же можно эти данные впихнуть в ворд.

#import "C:\Program Files\Common Files\Microsoft Shared\OFFICE11\mso.dll"
#import "C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB"
#import "C:\Program Files\Microsoft Office\OFFICE11\excel.exe" rename("DialogBox","ExcelDizlogBox") rename("RGB","ExcelRGB") exclude("IFont","IPicture")

using namespace Excel;
_ApplicationPtr ExcRep("Excel.Application");
ExcRep->Visible[0]=true;
_WorkbookPtr book = ExcRep->Workbooks->Open("123.xls");
_WorksheetPtr sheet = book->Worksheets->Item[1L];
XlsSheet=sheet;
CString sRange;
sRange.Format("a1");
RangePtr pRng=sheet->Range[(char*)sRange.GetString()];
sRange=(char*) pRng->GetValue();