如题.

解决方案 »

  1.   

    怎么没有人回复啊?
    是不是没说清楚啊.我是想在excel的指定的一个单元格中再创建一个表格.代码如下.bool CWriteExcelDlg::InsertExcel( CString &strFile, CString& strExcelName)
    { UpdateData(TRUE);//将框中的数据赋给变量 COleVariant VOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
    _Application objApp;
    _Workbook objBook;
    Workbooks objBooks;
    Worksheets objSheets;
    _Worksheet objSheet;
    Range objRange;

    BOOL bRet = FALSE;

     //创建Excel 2000服务器(启动Excel)
    bRet = objApp.CreateDispatch("Excel.Application");
    if (!bRet)
    {
    return FALSE;
    } //objApp.SetVisible(TRUE);          //使Excel可见
    objApp.SetUserControl(TRUE);   //允许用户操作EXCEL objBooks   =  objApp.GetWorkbooks();   
        //open excel file
    objBook = objBooks.Open(strFile,
    VOptional, VOptional, VOptional, VOptional,VOptional, VOptional, 
    VOptional, VOptional,VOptional, VOptional, VOptional, VOptional, 
    VOptional, VOptional);
    objSheets  =  objBook.GetWorksheets(); 
        objSheet = objSheets.GetItem(COleVariant((short)m_Sheet));//第几张表
    objRange =objSheet.GetUsedRange();

    比如说我想在第一行第一列中创建一个三行四列的表格.应该在此处怎么写啊?
                    objBook.Save();
    objBook.Close (VOptional,COleVariant(strExcelName),VOptional);
    objBooks.Close();      
    objApp.Quit(); 
    objApp.ReleaseDispatch();
       return true;}