C++使用OLE高速读写EXCEL的源码

写了不少blog，也码了一点点文字，不知道为啥，被大家看的比较多几篇文章却总有那篇《C++读写EXCEL文件方式比较》。

小小伤心一下，我blog里面写的很认真的文字还有几篇，这篇大概是最随意的文章。个人估计这是SEO的作用导致的。

另外，由于文中提到了可以加快OLE读取的EXCEL的速度，总有一些哥们找我要代码。

好吧，好吧，把代码放出来，因为我原来也是找人家的代码逐步改的。来而不往非礼也。

 

我的代码参考的地方是这儿，再次感谢原作者

http://blog.csdn.net/gyssoft/archive/2007/04/29/1592104.aspx

我根据自己的需要做了整理，干净了一点，而后根据发现的速度问题做了一些优化。

 

预加载的思路来自这个帖子

http://topic.csdn.net/t/20030626/21/1962211.html

其实思路很简单，不再一个CELL一个CELL的伛数据，而是一次把表格里面所有的数据读取出来处理。

 

.h文件的源码代码如下：

其中的头文件都是OLE的头文件。如何导出可以参考

http://blog.csdn.net/wyz365889/article/details/7599924

我自己这儿一直保存了一套别人生成的这几个文件，也可以用。大家可以找找有没有下载的，不过我不太确认跨版本是否可行。

还有既然是OLE，你一定要安装EXCEL的。

[cpp] view plaincopy

1. #pragma once  
2.   
3. //OLE的头文件  
4. #include <CRange.h>  
5. #include <CWorkbook.h>  
6. #include <CWorkbooks.h>  
7. #include <CWorksheet.h>  
8. #include <CWorksheets.h>  
9. #include <CApplication.h>  
10.   
11. ///  
12. ///用于OLE的方式的EXCEL读写，  
13. class IllusionExcelFile  
14. {  
15.   
16. public:  
17.   
18.     //构造函数和析构函数  
19.     IllusionExcelFile();  
20.     virtual ~IllusionExcelFile();  
21.   
22. protected:  
23.     ///打开的EXCEL文件名称  
24.     CString       open_excel_file_;  
25.   
26.     ///EXCEL BOOK集合，（多个文件时）  
27.     CWorkbooks    excel_books_;   
28.     ///当前使用的BOOK，当前处理的文件  
29.     CWorkbook     excel_work_book_;   
30.     ///EXCEL的sheets集合  
31.     CWorksheets   excel_sheets_;   
32.     ///当前使用sheet  
33.     CWorksheet    excel_work_sheet_;   
34.     ///当前的操作区域  
35.     CRange        excel_current_range_;   
36.   
37.   
38.     ///是否已经预加载了某个sheet的数据  
39.     BOOL          already_preload_;  
40.     ///Create the SAFEARRAY from the VARIANT ret.  
41.     COleSafeArray ole_safe_array_;  
42.   
43. protected:  
44.   
45.     ///EXCEL的进程实例  
46.     static CApplication excel_application_;  
47. public:  
48.       
49.     ///  
50.     void ShowInExcel(BOOL bShow);  
51.   
52.     ///检查一个CELL是否是字符串  
53.     BOOL    IsCellString(long iRow, long iColumn);  
54.     ///检查一个CELL是否是数值  
55.     BOOL    IsCellInt(long iRow, long iColumn);  
56.   
57.     ///得到一个CELL的String  
58.     CString GetCellString(long iRow, long iColumn);  
59.     ///得到整数  
60.     int     GetCellInt(long iRow, long iColumn);  
61.     ///得到double的数据  
62.     double  GetCellDouble(long iRow, long iColumn);  
63.   
64.     ///取得行的总数  
65.     int GetRowCount();  
66.     ///取得列的总数  
67.     int GetColumnCount();  
68.   
69.     ///使用某个shet，shit，shit  
70.     BOOL LoadSheet(long table_index,BOOL pre_load = FALSE);  
71.     ///通过名称使用某个sheet，  
72.     BOOL LoadSheet(const char* sheet,BOOL pre_load = FALSE);  
73.     ///通过序号取得某个Sheet的名称  
74.     CString GetSheetName(long table_index);  
75.   
76.     ///得到Sheet的总数  
77.     int GetSheetCount();  
78.   
79.     ///打开文件  
80.     BOOL OpenExcelFile(const char * file_name);  
81.     ///关闭打开的Excel 文件，有时候打开EXCEL文件就要  
82.     void CloseExcelFile(BOOL if_save = FALSE);  
83.     //另存为一个EXCEL文件  
84.     void SaveasXSLFile(const CString &xls_file);  
85.     ///取得打开文件的名称  
86.     CString GetOpenFileName();  
87.     ///取得打开sheet的名称  
88.     CString GetLoadSheetName();  
89.       
90.     ///写入一个CELL一个int  
91.     void SetCellInt(long irow, long icolumn,int new_int);  
92.     ///写入一个CELL一个string  
93.     void SetCellString(long irow, long icolumn,CString new_string);  
94.       
95. public:  
96.     ///初始化EXCEL OLE  
97.     static BOOL InitExcel();  
98.     ///释放EXCEL的 OLE  
99.     static void ReleaseExcel();  
100.     ///取得列的名称，比如27->AA  
101.     static char *GetColumnName(long iColumn);  
102.       
103. protected:  
104.   
105.     //预先加载  
106.     void PreLoadSheet();  
107. };  

CPP文件的与代码如下：

[cpp] view plaincopy

1. /****************************************************************************************** 
2. Copyright           : 2000-2004, Appache  2.0 
3. FileName            : illusion_excel_file.cpp 
4. Author              : Sail 
5. Version             :  
6. Date Of Creation    : 2009年4月3日 
7. Description         :  
8.  
9. Others              :  
10. Function List       :  
11.     1.  ...... 
12.         Modification History: 
13.     1.Date  : 
14. Author  : 
15. Modification  : 
16.  
17.     这个类是从网上下载的，我坐享其成，感谢原来的作者，我只试试是稍稍做了一下修正。 
18.     修正包括一些参数的使用不谨慎，bool 改为BOOL等,对于对象关系，我改了一部分，感觉原来的作者对于OO的思路部分不是很清楚。 
19.     对于这类东西OLE，我完全不了解，用别人封装的东西感觉还是放心了很多，C++，伟大的C++ 
20.      http://blog.csdn.net/gyssoft/archive/2007/04/29/1592104.aspx 
21.  
22.     OLE读写EXCEL都比较慢，所以应该尽量减少OLE的次数 
23.     对于读取，还有解决方法，请试用一下预加载的方式，这个方法一次加载所有的读取数据,如此速度就飞快了。 
24.     据说写数据是没有什么方法加快的 
25.     http://topic.csdn.net/t/20030626/21/1962211.html 
26.  
27.     增加了一些写入方式的代码，保证可以写入EXCEL数据区，但是对于保存，我发现如果调用CLOSE并且保存的方式， 
28.     速度非常慢，我不理解为什么。 
29.     所以我吧EXCEL打开了，让你进行后续管理, 
30.  
31.  
32. ******************************************************************************************/  
33.   
34.   
35.   
36.   
37. //-----------------------excelfile.cpp----------------  
38.   
39. #include "StdAfx.h"  
40. #include "illusion_excel_file.h"  
41.   
42.   
43.   
44. COleVariant  
45. covTrue((short)TRUE),  
46. covFalse((short)FALSE),  
47. covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);      
48.   
49. //  
50. CApplication IllusionExcelFile::excel_application_;  
51.   
52.   
53. IllusionExcelFile::IllusionExcelFile():  
54.     already_preload_(FALSE)  
55. {  
56. }  
57.   
58. IllusionExcelFile::~IllusionExcelFile()  
59. {  
60.     //  
61.     CloseExcelFile();  
62. }  
63.   
64.   
65. //初始化EXCEL文件，  
66. BOOL IllusionExcelFile::InitExcel()  
67. {  
68.   
69.     //创建Excel 2000服务器(启动Excel)   
70.     if (!excel_application_.CreateDispatch("Excel.Application",NULL))   
71.     {   
72.         AfxMessageBox("创建Excel服务失败,你可能没有安装EXCEL，请检查!");   
73.         return FALSE;  
74.     }  
75.   
76.     excel_application_.put_DisplayAlerts(FALSE);   
77.     return TRUE;  
78. }  
79.   
80. //  
81. void IllusionExcelFile::ReleaseExcel()  
82. {  
83.     excel_application_.Quit();  
84.     excel_application_.ReleaseDispatch();  
85.     excel_application_=NULL;  
86. }  
87.   
88. //打开excel文件  
89. BOOL IllusionExcelFile::OpenExcelFile(const char *file_name)  
90. {  
91.     //先关闭  
92.     CloseExcelFile();  
93.       
94.     //利用模板文件建立新文档   
95.     excel_books_.AttachDispatch(excel_application_.get_Workbooks(),true);   
96.   
97.     LPDISPATCH lpDis = NULL;  
98.     lpDis = excel_books_.Add(COleVariant(file_name));   
99.     if (lpDis)  
100.     {  
101.         excel_work_book_.AttachDispatch(lpDis);   
102.         //得到Worksheets   
103.         excel_sheets_.AttachDispatch(excel_work_book_.get_Worksheets(),true);   
104.           
105.         //记录打开的文件名称  
106.         open_excel_file_ = file_name;  
107.   
108.         return TRUE;  
109.     }  
110.       
111.     return FALSE;  
112. }  
113.   
114. //关闭打开的Excel 文件,默认情况不保存文件  
115. void IllusionExcelFile::CloseExcelFile(BOOL if_save)  
116. {  
117.     //如果已经打开，关闭文件  
118.     if (open_excel_file_.IsEmpty() == FALSE)  
119.     {  
120.         //如果保存,交给用户控制,让用户自己存，如果自己SAVE，会出现莫名的等待  
121.         if (if_save)  
122.         {  
123.             ShowInExcel(TRUE);  
124.         }  
125.         else  
126.         {  
127.             //  
128.             excel_work_book_.Close(COleVariant(short(FALSE)),COleVariant(open_excel_file_),covOptional);  
129.             excel_books_.Close();  
130.         }  
131.   
132.         //打开文件的名称清空  
133.         open_excel_file_.Empty();  
134.     }  
135.   
136.       
137.   
138.     excel_sheets_.ReleaseDispatch();  
139.     excel_work_sheet_.ReleaseDispatch();  
140.     excel_current_range_.ReleaseDispatch();  
141.     excel_work_book_.ReleaseDispatch();  
142.     excel_books_.ReleaseDispatch();  
143. }  
144.   
145. void IllusionExcelFile::SaveasXSLFile(const CString &xls_file)  
146. {  
147.     excel_work_book_.SaveAs(COleVariant(xls_file),  
148.         covOptional,  
149.         covOptional,  
150.         covOptional,  
151.         covOptional,  
152.         covOptional,  
153.         0,  
154.         covOptional,  
155.         covOptional,  
156.         covOptional,  
157.         covOptional,  
158.         covOptional);  
159.     return;  
160. }  
161.   
162.   
163. int IllusionExcelFile::GetSheetCount()  
164. {  
165.     return excel_sheets_.get_Count();  
166. }  
167.   
168.   
169. CString IllusionExcelFile::GetSheetName(long table_index)  
170. {  
171.     CWorksheet sheet;  
172.     sheet.AttachDispatch(excel_sheets_.get_Item(COleVariant((long)table_index)),true);  
173.     CString name = sheet.get_Name();  
174.     sheet.ReleaseDispatch();  
175.     return name;  
176. }  
177.   
178. //按照序号加载Sheet表格,可以提前加载所有的表格内部数据  
179. BOOL IllusionExcelFile::LoadSheet(long table_index,BOOL pre_load)  
180. {  
181.     LPDISPATCH lpDis = NULL;  
182.     excel_current_range_.ReleaseDispatch();  
183.     excel_work_sheet_.ReleaseDispatch();  
184.     lpDis = excel_sheets_.get_Item(COleVariant((long)table_index));  
185.     if (lpDis)  
186.     {  
187.         excel_work_sheet_.AttachDispatch(lpDis,true);  
188.         excel_current_range_.AttachDispatch(excel_work_sheet_.get_Cells(), true);  
189.     }  
190.     else  
191.     {  
192.         return FALSE;  
193.     }  
194.       
195.     already_preload_ = FALSE;  
196.     //如果进行预先加载  
197.     if (pre_load)  
198.     {  
199.         PreLoadSheet();  
200.         already_preload_ = TRUE;  
201.     }  
202.   
203.     return TRUE;  
204. }  
205.   
206. //按照名称加载Sheet表格,可以提前加载所有的表格内部数据  
207. BOOL IllusionExcelFile::LoadSheet(const char* sheet,BOOL pre_load)  
208. {  
209.     LPDISPATCH lpDis = NULL;  
210.     excel_current_range_.ReleaseDispatch();  
211.     excel_work_sheet_.ReleaseDispatch();  
212.     lpDis = excel_sheets_.get_Item(COleVariant(sheet));  
213.     if (lpDis)  
214.     {  
215.         excel_work_sheet_.AttachDispatch(lpDis,true);  
216.         excel_current_range_.AttachDispatch(excel_work_sheet_.get_Cells(), true);  
217.           
218.     }  
219.     else  
220.     {  
221.         return FALSE;  
222.     }  
223.     //  
224.     already_preload_ = FALSE;  
225.     //如果进行预先加载  
226.     if (pre_load)  
227.     {  
228.         already_preload_ = TRUE;  
229.         PreLoadSheet();  
230.     }  
231.   
232.     return TRUE;  
233. }  
234.   
235. //得到列的总数  
236. int IllusionExcelFile::GetColumnCount()  
237. {  
238.     CRange range;  
239.     CRange usedRange;  
240.     usedRange.AttachDispatch(excel_work_sheet_.get_UsedRange(), true);  
241.     range.AttachDispatch(usedRange.get_Columns(), true);  
242.     int count = range.get_Count();  
243.     usedRange.ReleaseDispatch();  
244.     range.ReleaseDispatch();  
245.     return count;  
246. }  
247.   
248. //得到行的总数  
249. int IllusionExcelFile::GetRowCount()  
250. {  
251.     CRange range;  
252.     CRange usedRange;  
253.     usedRange.AttachDispatch(excel_work_sheet_.get_UsedRange(), true);  
254.     range.AttachDispatch(usedRange.get_Rows(), true);  
255.     int count = range.get_Count();  
256.     usedRange.ReleaseDispatch();  
257.     range.ReleaseDispatch();  
258.     return count;  
259. }  
260.   
261. //检查一个CELL是否是字符串  
262. BOOL IllusionExcelFile::IsCellString(long irow, long icolumn)  
263. {  
264.     CRange range;  
265.     range.AttachDispatch(excel_current_range_.get_Item (COleVariant((long)irow),COleVariant((long)icolumn)).pdispVal, true);  
266.     COleVariant vResult =range.get_Value2();  
267.     //VT_BSTR标示字符串  
268.     if(vResult.vt == VT_BSTR)         
269.     {  
270.         return TRUE;  
271.     }  
272.     return FALSE;  
273. }  
274.   
275. //检查一个CELL是否是数值  
276. BOOL IllusionExcelFile::IsCellInt(long irow, long icolumn)  
277. {  
278.     CRange range;  
279.     range.AttachDispatch(excel_current_range_.get_Item (COleVariant((long)irow),COleVariant((long)icolumn)).pdispVal, true);  
280.     COleVariant vResult =range.get_Value2();  
281.     //好像一般都是VT_R8  
282.     if(vResult.vt == VT_INT || vResult.vt == VT_R8)         
283.     {  
284.         return TRUE;  
285.     }  
286.     return FALSE;  
287. }  
288.   
289. //  
290. CString IllusionExcelFile::GetCellString(long irow, long icolumn)  
291. {  
292.      
293.     COleVariant vResult ;  
294.     CString str;  
295.     //字符串  
296.     if (already_preload_ == FALSE)  
297.     {  
298.         CRange range;  
299.         range.AttachDispatch(excel_current_range_.get_Item (COleVariant((long)irow),COleVariant((long)icolumn)).pdispVal, true);  
300.         vResult =range.get_Value2();  
301.         range.ReleaseDispatch();  
302.     }  
303.     //如果数据依据预先加载了  
304.     else  
305.     {  
306.         long read_address[2];  
307.         VARIANT val;  
308.         read_address[0] = irow;  
309.         read_address[1] = icolumn;  
310.         ole_safe_array_.GetElement(read_address, &val);  
311.         vResult = val;  
312.     }  
313.   
314.     if(vResult.vt == VT_BSTR)  
315.     {  
316.         str=vResult.bstrVal;  
317.     }  
318.     //整数  
319.     else if (vResult.vt==VT_INT)  
320.     {  
321.         str.Format("%d",vResult.pintVal);  
322.     }  
323.     //8字节的数字   
324.     else if (vResult.vt==VT_R8)       
325.     {  
326.         str.Format("%0.0f",vResult.dblVal);  
327.     }  
328.     //时间格式  
329.     else if(vResult.vt==VT_DATE)      
330.     {  
331.         SYSTEMTIME st;  
332.         VariantTimeToSystemTime(vResult.date, &st);  
333.         CTime tm(st);   
334.         str=tm.Format("%Y-%m-%d");  
335.   
336.     }  
337.     //单元格空的  
338.     else if(vResult.vt==VT_EMPTY)     
339.     {  
340.         str="";  
341.     }    
342.   
343.     return str;  
344. }  
345.   
346. double IllusionExcelFile::GetCellDouble(long irow, long icolumn)  
347. {  
348.     double rtn_value = 0;  
349.     COleVariant vresult;  
350.     //字符串  
351.     if (already_preload_ == FALSE)  
352.     {  
353.         CRange range;  
354.         range.AttachDispatch(excel_current_range_.get_Item (COleVariant((long)irow),COleVariant((long)icolumn)).pdispVal, true);  
355.         vresult =range.get_Value2();  
356.         range.ReleaseDispatch();  
357.     }  
358.     //如果数据依据预先加载了  
359.     else  
360.     {  
361.         long read_address[2];  
362.         VARIANT val;  
363.         read_address[0] = irow;  
364.         read_address[1] = icolumn;  
365.         ole_safe_array_.GetElement(read_address, &val);  
366.         vresult = val;  
367.     }  
368.       
369.     if (vresult.vt==VT_R8)       
370.     {  
371.         rtn_value = vresult.dblVal;  
372.     }  
373.       
374.     return rtn_value;  
375. }  
376.   
377. //VT_R8  
378. int IllusionExcelFile::GetCellInt(long irow, long icolumn)  
379. {  
380.     int num;  
381.     COleVariant vresult;  
382.   
383.     if (already_preload_ == FALSE)  
384.     {  
385.         CRange range;  
386.         range.AttachDispatch(excel_current_range_.get_Item (COleVariant((long)irow),COleVariant((long)icolumn)).pdispVal, true);  
387.         vresult = range.get_Value2();  
388.         range.ReleaseDispatch();  
389.     }  
390.     else  
391.     {  
392.         long read_address[2];  
393.         VARIANT val;  
394.         read_address[0] = irow;  
395.         read_address[1] = icolumn;  
396.         ole_safe_array_.GetElement(read_address, &val);  
397.         vresult = val;  
398.     }  
399.     //  
400.     num = static_cast<int>(vresult.dblVal);  
401.   
402.     return num;  
403. }  
404.   
405. void IllusionExcelFile::SetCellString(long irow, long icolumn,CString new_string)  
406. {  
407.     COleVariant new_value(new_string);  
408.     CRange start_range = excel_work_sheet_.get_Range(COleVariant("A1"),covOptional);  
409.     CRange write_range = start_range.get_Offset(COleVariant((long)irow -1),COleVariant((long)icolumn -1) );  
410.     write_range.put_Value2(new_value);  
411.     start_range.ReleaseDispatch();  
412.     write_range.ReleaseDispatch();  
413.   
414. }  
415.   
416. void IllusionExcelFile::SetCellInt(long irow, long icolumn,int new_int)  
417. {  
418.     COleVariant new_value((long)new_int);  
419.       
420.     CRange start_range = excel_work_sheet_.get_Range(COleVariant("A1"),covOptional);  
421.     CRange write_range = start_range.get_Offset(COleVariant((long)irow -1),COleVariant((long)icolumn -1) );  
422.     write_range.put_Value2(new_value);  
423.     start_range.ReleaseDispatch();  
424.     write_range.ReleaseDispatch();  
425. }  
426.   
427.   
428. //  
429. void IllusionExcelFile::ShowInExcel(BOOL bShow)  
430. {  
431.     excel_application_.put_Visible(bShow);  
432.     excel_application_.put_UserControl(bShow);  
433. }  
434.   
435. //返回打开的EXCEL文件名称  
436. CString IllusionExcelFile::GetOpenFileName()  
437. {  
438.     return open_excel_file_;  
439. }  
440.   
441. //取得打开sheet的名称  
442. CString IllusionExcelFile::GetLoadSheetName()  
443. {  
444.     return excel_work_sheet_.get_Name();  
445. }  
446.   
447. //取得列的名称，比如27->AA  
448. char *IllusionExcelFile::GetColumnName(long icolumn)  
449. {     
450.     static char column_name[64];  
451.     size_t str_len = 0;  
452.       
453.     while(icolumn > 0)  
454.     {  
455.         int num_data = icolumn % 26;  
456.         icolumn /= 26;  
457.         if (num_data == 0)  
458.         {  
459.             num_data = 26;  
460.             icolumn--;  
461.         }  
462.         column_name[str_len] = (char)((num_data-1) + 'A' );  
463.         str_len ++;  
464.     }  
465.     column_name[str_len] = '\0';  
466.     //反转  
467.     _strrev(column_name);  
468.   
469.     return column_name;  
470. }  
471.   
472. //预先加载  
473. void IllusionExcelFile::PreLoadSheet()  
474. {  
475.   
476.     CRange used_range;  
477.   
478.     used_range = excel_work_sheet_.get_UsedRange();   
479.   
480.   
481.     VARIANT ret_ary = used_range.get_Value2();  
482.     if (!(ret_ary.vt & VT_ARRAY))  
483.     {  
484.         return;  
485.     }  
486.     //  
487.     ole_safe_array_.Clear();  
488.     ole_safe_array_.Attach(ret_ary);   
489. }  

【本文作者是雁渡寒潭，本着自由的精神，你可以在无盈利的情况完整转载此文档，转载时请附上BLOG链接:http://www.cnblogs.com/fullsail/ 或者http://blog.csdn.net/fullsail，否则每字一元，每图一百不讲价。对Baidu文库。360doc加价一倍】