在VC环境下对Excel数据读写

//以下函数用于读取Excel文件的数据，并保存到矩阵中 void CMaizeClassificationDoc::ImportDataFromExcel(CvMat *mat, CString strFilePath) { // Excel应用对象 _Application m_oExcelApp; // Excel程序 _Worksheet m_oWorkSheet; // 工作表 _Workbook m_oWorkBook; // 工作簿 Workbooks m_oWorkBooks; // 工作簿集合 Worksheets m_oWorkSheets; // 工作表集合 Range m_oCurrRange; // 使用区域 //if (CoInitialize(NULL)!=0) if(::CoInitialize( NULL ) == E_INVALIDARG) { AfxMessageBox("初始化COM支持库失败!"); exit(1); } if (!m_oExcelApp.CreateDispatch( _T( "Excel.Application" ), NULL ) ) { AfxMessageBox( _T( "创建Excel服务失败！" )); exit(1); } //设置为不显示 m_oExcelApp.SetVisible(FALSE); m_oWorkBooks.AttachDispatch( m_oExcelApp.GetWorkbooks(), TRUE ); //没有这条语句，下面打开文件返回失败。 LPDISPATCH lpDisp = NULL; COleVariant covTrue((short)TRUE); COleVariant covFalse((short)FALSE); COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR); Range oCurCell; // 打开文件 lpDisp = m_oWorkBooks.Open( strFilePath, _variant_t(vtMissing), _variant_t(vtMissing), _variant_t(vtMissing), _variant_t(vtMissing), _variant_t(vtMissing), _variant_t(vtMissing), _variant_t(vtMissing), _variant_t(vtMissing), _variant_t(vtMissing), _variant_t(vtMissing), _variant_t(vtMissing), _variant_t(vtMissing), _variant_t(vtMissing), _variant_t(vtMissing) ); // 获得活动的WorkBook( 工作簿 ) m_oWorkBook.AttachDispatch( lpDisp, TRUE ); // 获得活动的WorkSheet( 工作表 ) m_oWorkSheet.AttachDispatch( m_oWorkBook.GetActiveSheet(), TRUE ); // 获得使用的区域Range( 区域 ) m_oCurrRange.AttachDispatch( m_oWorkSheet.GetUsedRange(), TRUE ); // 获得使用的行数 long lgUsedRowNum = 0; m_oCurrRange.AttachDispatch( m_oCurrRange.GetRows(), TRUE ); lgUsedRowNum = m_oCurrRange.GetCount(); // 获得使用的列数 long lgUsedColumnNum = 0; m_oCurrRange.AttachDispatch( m_oCurrRange.GetColumns(), TRUE ); lgUsedColumnNum = m_oCurrRange.GetCount(); // 读取Sheet的名称 CString strSheetName = m_oWorkSheet.GetName(); //得到全部Cells，此时,CurrRange是cells的集合 m_oCurrRange.AttachDispatch( m_oWorkSheet.GetCells(), TRUE ); // 遍历整个Excel表格 CStringArray* arrayStr; arrayStr = new CStringArray[lgUsedRowNum]; for ( int i = 0; i < lgUsedRowNum;i++ ) { for ( int j = 1; j <= lgUsedColumnNum; j++) { oCurCell.AttachDispatch( m_oCurrRange.GetItem( COleVariant( (long)(i + 1)), COleVariant( (long)j ) ).pdispVal, TRUE ); VARIANT varItemName = oCurCell.GetText(); CString strItemName; strItemName = varItemName.bstrVal; float value; //value=varItemName.fltVal; // swscanf(strItemName,_T("%f"),&value); value=atof(strItemName.GetBuffer(0)); // AfxMessageBox( strItemName ); // 判断是否是合并的单元格 VARIANT varMerge = oCurCell.GetMergeCells(); if ( varMerge.boolVal == -1 ) { // AfxMessageBox( _T( "是合并的单元格!" ) ); } else if ( varMerge.boolVal == 0 ) { // AfxMessageBox( _T( "不是合并的单元格!" ) ); } cvSetReal2D( mat, i, j-1,value); } } // 关闭 m_oWorkBook.Close( covOptional, COleVariant( strFilePath ), covOptional ); m_oWorkBooks.Close(); // 释放 m_oCurrRange.ReleaseDispatch(); m_oWorkSheet.ReleaseDispatch(); m_oWorkSheets.ReleaseDispatch(); m_oWorkBook.ReleaseDispatch(); m_oWorkBooks.ReleaseDispatch(); m_oExcelApp.ReleaseDispatch(); m_oExcelApp.Quit(); // 这条语句是推出Excel程序，任务管理器中的EXCEL进程会自动结束。 }