VC6.0實(shí)現(xiàn)讀取Excel數(shù)據(jù)的方法
Excel是常用的辦公軟件之一,本文以Excel2003為例說(shuō)明VC程序讀取Excel文件的方法。具體步驟如下:
1.首先要將excel類添加到工程中。
在ClassWizard中,【Add Class】,在Excel的安裝目錄找到Excel.exe(Microsoft2003是Excel.exe;2007應(yīng)該又獨(dú)立的lib庫(kù),這個(gè)沒有驗(yàn)證),添加必要的幾個(gè)類:
// Excel應(yīng)用對(duì)象 _Application m_oExcelApp; // Excel程序 _Worksheet m_oWorkSheet; // 工作表 _Workbook m_oWorkBook; // 工作簿 Workbooks m_oWorkBooks; // 工作簿集合 Worksheets m_oWorkSheets; // 工作表集合 Range m_oCurrRange; // 使用區(qū)域
添加到工程中的文件是excel.h和excel.cpp。
2.初始化Com庫(kù)
if (CoInitialize(NULL)!=0) { AfxMessageBox("初始化COM支持庫(kù)失敗!"); exit(1); }
3.讀取文件中的數(shù)據(jù)
if (!m_oExcelApp.CreateDispatch( _T( "Excel.Application" ), NULL ) ) { ::MessageBox( NULL, _T( "創(chuàng)建Excel服務(wù)失?。? ), _T( "錯(cuò)誤提示!" ), MB_OK | MB_ICONERROR); exit(1); } //設(shè)置為顯示 m_oExcelApp.SetVisible(FALSE); m_oWorkBooks.AttachDispatch( m_oExcelApp.GetWorkbooks(), TRUE ); //沒有這條語(yǔ)句,下面打開文件返回失敗。 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) ); // 獲得活動(dòng)的WorkBook( 工作簿 ) m_oWorkBook.AttachDispatch( lpDisp, TRUE ); // 獲得活動(dòng)的WorkSheet( 工作表 ) m_oWorkSheet.AttachDispatch( m_oWorkBook.GetActiveSheet(), TRUE ); // 獲得使用的區(qū)域Range( 區(qū)域 ) m_oCurrRange.AttachDispatch( m_oWorkSheet.GetUsedRange(), TRUE ); // 獲得使用的行數(shù) long lgUsedRowNum = 0; m_oCurrRange.AttachDispatch( m_oCurrRange.GetRows(), TRUE ); lgUsedRowNum = m_oCurrRange.GetCount(); // 獲得使用的列數(shù) long lgUsedColumnNum = 0; m_oCurrRange.AttachDispatch( m_oCurrRange.GetColumns(), TRUE ); lgUsedColumnNum = m_oCurrRange.GetCount(); // 讀取Sheet的名稱 CString strSheetName = m_oWorkSheet.GetName(); //得到全部Cells,此時(shí),CurrRange是cells的集合 m_oCurrRange.AttachDispatch( m_oWorkSheet.GetCells(), TRUE ); // 遍歷整個(gè)Excel表格 CStringArray* arrayStr; arrayStr = new CStringArray[lgUsedRowNum]; for ( int i = 0; i < lgUsedRowNum; ) { for ( int j = 1; j <= lgUsedColumnNum; ) { oCurCell.AttachDispatch( m_oCurrRange.GetItem( COleVariant( (long)(i + 1)), COleVariant( (long)j ) ).pdispVal, TRUE ); VARIANT varItemName = oCurCell.GetText(); CString strItemName; strItemName = varItemName.bstrVal; // AfxMessageBox( strItemName ); // 判斷是否是合并的單元格 VARIANT varMerge = oCurCell.GetMergeCells(); if ( varMerge.boolVal == -1 ) { // AfxMessageBox( _T( "是合并的單元格!" ) ); } else if ( varMerge.boolVal == 0 ) { // AfxMessageBox( _T( "不是合并的單元格!" ) ); } arrayStr[i].Add( strItemName ); j++; } i++; } // 更新列表控件數(shù)據(jù) m_pExcelOperDlg->initListCtrlColumn( lgUsedColumnNum ); m_pExcelOperDlg->updateListCtrlData( arrayStr, lgUsedRowNum ); // 釋放二維數(shù)組 delete[] arrayStr; // 關(guān)閉 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(); // 這條語(yǔ)句是推出Excel程序,任務(wù)管理器中的EXCEL進(jìn)程會(huì)自動(dòng)結(jié)束。
補(bǔ)充:本文所述程序?qū)嵗暾创a點(diǎn)此下載
上一篇:sqlserver,sqlite,access數(shù)據(jù)庫(kù)鏈接字符串整理
欄 目:C語(yǔ)言
下一篇:VC++簡(jiǎn)單實(shí)現(xiàn)關(guān)機(jī)、重啟計(jì)算機(jī)實(shí)例代碼
本文標(biāo)題:VC6.0實(shí)現(xiàn)讀取Excel數(shù)據(jù)的方法
本文地址:http://mengdiqiu.com.cn/a1/Cyuyan/3556.html
您可能感興趣的文章
- 01-10數(shù)據(jù)結(jié)構(gòu)課程設(shè)計(jì)-用棧實(shí)現(xiàn)表達(dá)式求值的方法詳解
- 01-10使用OpenGL實(shí)現(xiàn)3D立體顯示的程序代碼
- 01-10求斐波那契(Fibonacci)數(shù)列通項(xiàng)的七種實(shí)現(xiàn)方法
- 01-10C語(yǔ)言 解決不用+、-、&#215;、&#247;數(shù)字運(yùn)算符做加法
- 01-10使用C++實(shí)現(xiàn)全排列算法的方法詳解
- 01-10用C++實(shí)現(xiàn)DBSCAN聚類算法
- 01-10深入全排列算法及其實(shí)現(xiàn)方法
- 01-10全排列算法的非遞歸實(shí)現(xiàn)與遞歸實(shí)現(xiàn)的方法(C++)
- 01-10用C語(yǔ)言實(shí)現(xiàn)單鏈表的各種操作(一)
- 01-10用C語(yǔ)言實(shí)現(xiàn)單鏈表的各種操作(二)


閱讀排行
- 1C語(yǔ)言 while語(yǔ)句的用法詳解
- 2java 實(shí)現(xiàn)簡(jiǎn)單圣誕樹的示例代碼(圣誕
- 3利用C語(yǔ)言實(shí)現(xiàn)“百馬百擔(dān)”問題方法
- 4C語(yǔ)言中計(jì)算正弦的相關(guān)函數(shù)總結(jié)
- 5c語(yǔ)言計(jì)算三角形面積代碼
- 6什么是 WSH(腳本宿主)的詳細(xì)解釋
- 7C++ 中隨機(jī)函數(shù)random函數(shù)的使用方法
- 8正則表達(dá)式匹配各種特殊字符
- 9C語(yǔ)言十進(jìn)制轉(zhuǎn)二進(jìn)制代碼實(shí)例
- 10C語(yǔ)言查找數(shù)組里數(shù)字重復(fù)次數(shù)的方法
本欄相關(guān)
- 04-02c語(yǔ)言函數(shù)調(diào)用后清空內(nèi)存 c語(yǔ)言調(diào)用
- 04-02func函數(shù)+在C語(yǔ)言 func函數(shù)在c語(yǔ)言中
- 04-02c語(yǔ)言的正則匹配函數(shù) c語(yǔ)言正則表達(dá)
- 04-02c語(yǔ)言用函數(shù)寫分段 用c語(yǔ)言表示分段
- 04-02c語(yǔ)言中對(duì)數(shù)函數(shù)的表達(dá)式 c語(yǔ)言中對(duì)
- 04-02c語(yǔ)言編寫函數(shù)冒泡排序 c語(yǔ)言冒泡排
- 04-02c語(yǔ)言沒有round函數(shù) round c語(yǔ)言
- 04-02c語(yǔ)言分段函數(shù)怎么求 用c語(yǔ)言求分段
- 04-02C語(yǔ)言中怎么打出三角函數(shù) c語(yǔ)言中怎
- 04-02c語(yǔ)言調(diào)用函數(shù)求fibo C語(yǔ)言調(diào)用函數(shù)求
隨機(jī)閱讀
- 01-10delphi制作wav文件的方法
- 01-11ajax實(shí)現(xiàn)頁(yè)面的局部加載
- 01-10SublimeText編譯C開發(fā)環(huán)境設(shè)置
- 01-10C#中split用法實(shí)例總結(jié)
- 01-10使用C語(yǔ)言求解撲克牌的順子及n個(gè)骰子
- 08-05織夢(mèng)dedecms什么時(shí)候用欄目交叉功能?
- 08-05DEDE織夢(mèng)data目錄下的sessions文件夾有什
- 04-02jquery與jsp,用jquery
- 08-05dedecms(織夢(mèng))副欄目數(shù)量限制代碼修改
- 01-11Mac OSX 打開原生自帶讀寫NTFS功能(圖文