VS2010对Excel操作---DLL向
最近公司有个项目要用到Excel的操作,于是自己就对VC中关于Excel的操作进行整理了下。而这里我是直接做成DLL方便他人调用的。
-
创建一个MFC Dll项目。
- 选择MFC扩展DLL。
- 在“类视图”---“添加类”---在MFC中选择“TypeLib中的MFC类”,按如图所示选择,并添加对应的类
PS:由于我电脑上安装的是office2010,所以对应的Excel版本号是14.0,各位可以根据自己的情况选择。
- 删除这六个类的头文件中的第一句,如图,并将头文件添加到“stdafx.h"中
- 修改字符集,vs2010默认生成的是使用unicode字符集,这里我们把它修改为”使用多字节字符集“,这样能避免很多不必要的麻烦。
- 接下来进行编译,正常情况下会出现如下错误:
这时候定位到警告处,在函数名之前加上下划线就OK了。如图:
这样编译就没什么问题了。
-
接下就是直接添加导出函数来,这里我偷个懒直接到dllmain.cpp这个文件里面加了,大家可以根据自己的习惯来。
1 extern "C" _declspec(dllexport) void ReadExcel(const CString& strPath,const CString& strFlag, const vector<CString>& vTarget,vector<CString>& vOutTarget) 2 { 3 CApplication _app; 4 CWorkbook _book; 5 CWorkbooks _books; 6 7 CWorksheet _sheet; 8 CWorksheets _sheets; 9 CRange _rang; 10 11 if (!_app.CreateDispatch(_T("Excel.Application"))) 12 { 13 MessageBox(NULL,_T("Error!Creat Excel Application Server Faile!"),_T("Creat Excel Application Server"),MB_ICONERROR); 14 exit(1); 15 } 16 _books = _app.get_Workbooks(); 17 _book = _books.Add(_variant_t(strPath)); 18 19 _sheets = _book.get_Worksheets(); 20 _sheet = _sheets.get_Item(_variant_t("电力电缆井")); 21 22 //获取行列数 23 CRange _usedRang; 24 _usedRang.AttachDispatch(_sheet.get_UsedRange(),TRUE); 25 _rang.AttachDispatch(_usedRang.get_Columns(),TRUE); 26 long nColumn = _rang.get_Count();//列 27 _rang.ReleaseDispatch(); 28 _rang.AttachDispatch(_usedRang.get_Rows(),TRUE); 29 long nRow = _rang.get_Count();//行 30 _rang.ReleaseDispatch(); 31 _usedRang.ReleaseDispatch(); 32 //遍历 33 _rang.AttachDispatch(_sheet.get_Cells(),TRUE);//获取所有单元格 34 CString str; 35 long nCurRow = 0; 36 long nCurColumn = 0; 37 //获取关键字所在的行列号 38 for (long i = 1; i <= nRow; ++i) 39 { 40 for (long j = 1; j <= nColumn; ++j) 41 { 42 CRange _currentRang; 43 _currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)i),COleVariant((long)j)).pdispVal,TRUE); 44 COleVariant vResult = _currentRang.get_Value2(); 45 46 if (VT_BSTR == vResult.vt)//字符串 47 { 48 str = vResult.bstrVal; 49 } 50 else if (VT_INT==vResult.vt) 51 { 52 str.Format(_T("%d"),vResult.pintVal); 53 } 54 else if (VT_R8==vResult.vt)//8字节数字 55 { 56 str.Format(_T("%f"),vResult.dblVal); 57 } 58 else if (VT_DATE==vResult.vt)//时间格式 59 { 60 SYSTEMTIME st; 61 VariantTimeToSystemTime(vResult.date,&st); 62 } 63 else if (VT_EMPTY==vResult.vt)//空单元格 64 { 65 str = "(NULL)"; 66 } 67 _currentRang.ReleaseDispatch(); 68 if (strFlag==str)//直接使用goto语句跳出双重循环 69 { 70 nCurRow = i; 71 nCurColumn = j; 72 goto LOOPOUT; 73 } 74 } 75 } 76 77 LOOPOUT: 78 vector<long> vNTarget;//目标列所在的列号 79 for (long i = 1;i <= nColumn;++i) 80 { 81 CRange _currentRang; 82 _currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)1),COleVariant((long)i)).pdispVal,TRUE); 83 COleVariant vResult = _currentRang.get_Value2(); 84 85 if (VT_BSTR == vResult.vt)//字符串 86 { 87 str = vResult.bstrVal; 88 } 89 else if (VT_INT==vResult.vt) 90 { 91 str.Format(_T("%d"),vResult.pintVal); 92 } 93 else if (VT_R8==vResult.vt)//8字节数字 94 { 95 str.Format(_T("%f"),vResult.dblVal); 96 } 97 else if (VT_DATE==vResult.vt)//时间格式 98 { 99 SYSTEMTIME st; 100 VariantTimeToSystemTime(vResult.date,&st); 101 } 102 else if (VT_EMPTY==vResult.vt)//空单元格 103 { 104 str = "(NULL)"; 105 } 106 _currentRang.ReleaseDispatch(); 107 //对取出来的str和目标str进行配对 108 for (vector<CString>::size_type j = 0;j != vTarget.size(); ++j) 109 { 110 if (vTarget.at(j)==str) 111 { 112 vNTarget.push_back(i); 113 break; 114 } 115 } 116 } 117 //接下来根据获取的行号nCurRow和列号vNTarget来读取指定内容 118 for (vector<CString>::size_type i = 0; i != vTarget.size(); ++i) 119 { 120 CRange _currentRang; 121 _currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)nCurRow),COleVariant((long)vNTarget.at(i))).pdispVal,TRUE); 122 COleVariant vResult = _currentRang.get_Value2(); 123 124 if (VT_BSTR == vResult.vt)//字符串 125 { 126 str = vResult.bstrVal; 127 } 128 else if (VT_INT==vResult.vt) 129 { 130 str.Format(_T("%d"),vResult.pintVal); 131 } 132 else if (VT_R8==vResult.vt)//8字节数字 133 { 134 str.Format(_T("%f"),vResult.dblVal); 135 } 136 else if (VT_DATE==vResult.vt)//时间格式 137 { 138 SYSTEMTIME st; 139 VariantTimeToSystemTime(vResult.date,&st); 140 } 141 else if (VT_EMPTY==vResult.vt)//空单元格 142 { 143 str = "(NULL)"; 144 } 145 _currentRang.ReleaseDispatch(); 146 vOutTarget.push_back(str); 147 } 148 149 _book.ReleaseDispatch(); 150 _books.ReleaseDispatch(); 151 _app.Quit();
152 _app.ReleaseDispatch();
153 }
上述函数就是打开路径strPath的Excel文件,并通过标志符strFlag找到要读取的行,通过vTarget找到要读取的列,将读取的内容输出到vOutTarget中。这里我是默认表格的第一行就是存放的表头,大家可以根据自己的实际情况进行调整。 - 接下来再添加一个关于更新(即写某个单元格的函数)
1 extern "C" _declspec(dllexport) void UpdateExcel(const CString& strPath,const CString& strFlag,const vector<CString>& vTarget,const vector<CString>& vInTarget) 2 { 3 CApplication _app; 4 CWorkbook _book; 5 CWorkbooks _books; 6 7 CWorksheet _sheet; 8 CWorksheets _sheets; 9 CRange _rang; 10 11 if (!_app.CreateDispatch(_T("Excel.Application"))) 12 { 13 MessageBox(NULL,_T("Error!Creat Excel Application Server Faile!"),_T("Creat Excel Application Server"),MB_ICONERROR); 14 exit(1); 15 } 16 _books = _app.get_Workbooks(); 17 _book = _books.Add(_variant_t(strPath)); 18 19 _sheets = _book.get_Worksheets(); 20 _sheet = _sheets.get_Item(_variant_t("电力电缆井")); 21 22 //获取行列数 23 CRange _usedRang; 24 _usedRang.AttachDispatch(_sheet.get_UsedRange(),TRUE); 25 _rang.AttachDispatch(_usedRang.get_Columns(),TRUE); 26 long nColumn = _rang.get_Count();//列 27 _rang.ReleaseDispatch(); 28 _rang.AttachDispatch(_usedRang.get_Rows(),TRUE); 29 long nRow = _rang.get_Count();//行 30 _rang.ReleaseDispatch(); 31 _usedRang.ReleaseDispatch(); 32 //遍历 33 _rang.AttachDispatch(_sheet.get_Cells(),TRUE);//获取所有单元格 34 CString str; 35 long nCurRow = 0; 36 long nCurColumn = 0; 37 //获取关键字所在的行列号 38 for (long i = 1; i <= nRow; ++i) 39 { 40 for (long j = 1; j <= nColumn; ++j) 41 { 42 CRange _currentRang; 43 _currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)i),COleVariant((long)j)).pdispVal,TRUE); 44 COleVariant vResult = _currentRang.get_Value2(); 45 46 if (VT_BSTR == vResult.vt)//字符串 47 { 48 str = vResult.bstrVal; 49 } 50 else if (VT_INT==vResult.vt) 51 { 52 str.Format(_T("%d"),vResult.pintVal); 53 } 54 else if (VT_R8==vResult.vt)//8字节数字 55 { 56 str.Format(_T("%f"),vResult.dblVal); 57 } 58 else if (VT_DATE==vResult.vt)//时间格式 59 { 60 SYSTEMTIME st; 61 VariantTimeToSystemTime(vResult.date,&st); 62 } 63 else if (VT_EMPTY==vResult.vt)//空单元格 64 { 65 str = "(NULL)"; 66 } 67 _currentRang.ReleaseDispatch(); 68 if (strFlag==str)//直接使用goto语句跳出双重循环 69 { 70 nCurRow = i; 71 nCurColumn = j; 72 goto LOOPOUT; 73 } 74 } 75 } 76 77 LOOPOUT: 78 vector<long> vNTarget;//目标列所在的列号 79 for (long i = 1;i <= nColumn;++i) 80 { 81 CRange _currentRang; 82 _currentRang.AttachDispatch(_rang.get_Item(COleVariant((long)1),COleVariant((long)i)).pdispVal,TRUE); 83 COleVariant vResult = _currentRang.get_Value2(); 84 85 if (VT_BSTR == vResult.vt)//字符串 86 { 87 str = vResult.bstrVal; 88 } 89 else if (VT_INT==vResult.vt) 90 { 91 str.Format(_T("%d"),vResult.pintVal); 92 } 93 else if (VT_R8==vResult.vt)//8字节数字 94 { 95 str.Format(_T("%f"),vResult.dblVal); 96 } 97 else if (VT_DATE==vResult.vt)//时间格式 98 { 99 SYSTEMTIME st; 100 VariantTimeToSystemTime(vResult.date,&st); 101 } 102 else if (VT_EMPTY==vResult.vt)//空单元格 103 { 104 str = "(NULL)"; 105 } 106 _currentRang.ReleaseDispatch(); 107 //对取出来的str和目标str进行配对 108 for (vector<CString>::size_type j = 0;j != vTarget.size(); ++j) 109 { 110 if (vTarget.at(j)==str) 111 { 112 vNTarget.push_back(i); 113 break; 114 } 115 } 116 } 117 //更新指定的单元格 118 for (vector<CString>::size_type i = 0; i != vInTarget.size(); ++i) 119 { 120 _rang.put_Item(COleVariant(nCurRow),COleVariant(vNTarget.at(i)),COleVariant(vInTarget.at(i))); 121 }
1 _book.SaveCopyAs(COleVariant(strPath)); 2 _book.put_Saved(TRUE); 3 _app.put_Visible(FALSE); 4 _book.ReleaseDispatch(); 5 _books.ReleaseDispatch(); 6 7 _app.Quit() 8 _app.ReleaseDispatch();
126 }
参数的设置和上一个函数差不多。 - 接下来编译的时候,正常情况下会有一点小问题。这个问题如果你是基于对话框的MFC程序貌似是不会出现的,只有创建DLL或者ActiveX控件才会出现。
这个问题也是烦恼了我好久,解决方法是先在文件头导入一个lib
在编译,运气好的话就没什么问题了。运气不好还会出下如下问题。
这个时候我们修改下项目属性
把我标出来的选项改为否应该就没什么问题了。
- 最后编译完成通过。这样dll和lib就都生成好了,大家可以尽情的使用了。
- 差不多就这样了,至于其他的问题,比如如果直接创建的是基于对话框的MFc程序的话就更简单了。跟着步骤走就完事了。最后我是一个菜鸟,如果有什么问题也欢迎大家指教。