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的。
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文件的与代码如下：
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加价一倍】
