VC读写ECEL文件类(已安装ecel)-VC学习之路-CSDN博客.pdfVIP

VC 读写 EXCEL 文件类（已安装 excel ） - VC 学习之路 - CSDN 博客 以下是 .h 文件 #pragma once class CReadWriteExcel { private: long CStringToLong(CString sStr); int GetColumnWidth(CString sA,CString sB); BOOL CheckString(CString str,CString amp;sLeft,CString amp;sRight,long amp;nRight); HRESULT AutoWrap(int autoType, V ARIANT *pvResult, IDispatch *pDisp, LPOLESTR ptName, int cArgs...); public: int ReadExcelStringArray(const CString strfilename,CStringArray amp;strArray,const CString sBeginCell,const CString sEndCell); BOOL WriteExcelStringArray(const CString strfilename,CStringArray amp;strArray,long nColumn); //BOOL SetRangValueType(int nType,const CString sBeginCell,const CString sEndCell); }; // 以下是 .cpp 文件 #include stdafx.h #include ReadWriteExcel.h //读取数据，返回列数 int CReadWriteExcel::ReadExcelStringArray(const CString strfilename,CStringArray amp;strArray,CString sBeginCell,CString sEndCell) { // 检查 Range 输入 ,并计算行列 if(sBeginCell.IsEmpty()|| sEndCell.IsEmpty()) return -1; // 转成大写 sBeginCell.MakeUpper(); sEndCell.MakeUpper(); CString sBL,sBR; long nB; if(!CheckString(sBeginCell,sBL,sBR,nB)) return -1; CString sEL,sER; long nE; if(!CheckString(sEndCell,sEL,sER,nE)) return -1; int col=GetColumnWidth(sBL,sEL); int row=nE-nB+1; strArray.RemoveAll(); strArray.SetSize(row*col); // 处理所有 Excel 数据，并把所有数据加入到一个二维数 组中 CoInitialize(NULL); int i,j; // 用来循环 // 获得 EXCEL 的 CLSID CLSID clsid; HRESULT hr = CLSIDFromProgID(LExcel.Application, amp;clsid); if(FAILED(hr)) { AfxMessageBox(_T(CLSIDFromProgID() 函数调 用失败 !)); return -1; } // 创建实例 IDispatch *pXlApp; hr = CoCreateInstance(clsid, NULL, CLSCTX_LOCAL_SERVER, IID_IDispatch, (void **)amp;pXlApp); if(FAILED(hr)) {