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

通过VC实现对Excel表格的操作的方法有多种，如：通过ODBC数据库实现，通过解析Excel表格文件，通过OLE/COM的实现。本文主要研究通过OLE/COM实现对Excel表格的操作。另外，本文主代码中汇聚各网友的智慧进行了优化（比如预加载等），可以加快OLE读取的EXCEL的速度。

简单介绍下步骤：
1、导入并封装Excel中的接口

Excel作为OLE/COM库插件，定义好了各类交互的接口，这些接口是跨语言的接口。VC可以通过导入这些接口，并通过接口来对Excel的操作。

由于本文只关心对Excel表格中的数据的读取，主要关注几个_Application、Workbooks、_Workbook、Worksheets、_Worksheet、Range等几个接口。Excel的各类接口的属性、方法可以通过MSDN的Office Development进行查询。

VS2010导入OLE/COM组件的接口的步骤为：Project->Class Wizard->Add Class->MFC Class From TypeLib，先选择要导入的组件所在的路径，即Excel.exe所在的路径，然后再选择

要导入的Excel类型库中的接口。

在完成接口导入后，VS2010将自动为导入的接口创建相应的实现类，用于对接口属性和方法的实现。由于标准的C++没有属性访问器，只能添加一个两个存取函数来实现对属性的访问，通过在属性名称前加上get_和put_前缀分别实现对属性的读写操作。即，由VC自动完成C++类对接口的封装。

本文所导入的接口对应的类和头文件的说明如下所示：

Excel接口	导入类	头文件	说明
_Application	CApplicaton	Application.h	Excel应用程序。
Workbooks	CWorkbooks	Workbooks.h	工作簿的容器，里面包括了Excel应用程序打开的所有工作簿。
_Workbook	CWorkbook	Workbook.h	单个工作簿。
Worksheets	CWorksheets	Worksheets.h	单个工作簿中的Sheet表格的容器，包括该工作簿中的所有Sheet。
_Worksheet	CWorksheet	Worksheet.h	单个Sheet表格。
Range	CRange	Range.h	一定数量的单元格，可对单元格进行单个或多个单元格进行操作。

2、导入Excel的整个类型库

stdafx.h

#include <afxdisp.h>        // MFC Automation 類別...
/*导入Office的类型库*/
#import "C:\\Program Files (x86)\\Common Files\\Microsoft Shared\\OFFICE15\\MSO.DLL" \rename("RGB", "MSORGB") \rename("DocumentProperties", "MSODocumentProperties")
//using namespace Office;/*导入VB的类型库*/
#import "C:\\Program Files (x86)\\Common Files\\Microsoft Shared\\VBA\\VBA6\\VBE6EXT.OLB"
//using namespace VBIDE;/*导入Excel的类型库*/
#import "D:\\Program Files\\Microsoft Office\\Office15\\EXCEL.EXE" \rename("DialogBox", "ExcelDialogBox") \rename("RGB", "ExcelRGB") \rename("CopyFile", "ExcelCopyFile") \rename("ReplaceText", "ExcelReplaceText") \no_auto_exclude
using namespace Excel;
...

注：以上的路径根据自己电脑的不同情况分别设置，不过前提是一定得装了Excel。

3、操作Excel步骤

操作Excel的主要步骤如下：

（1）创建一个Excel应用程序。

（2）得到Workbook的容器。

（3）打开一个Workbook或者创建一个Workbook。

（4）得到Workbook中的Worksheet的容器。

（5）打开一个Worksheet或者创建一个WorkSheet。

（6）通过Range对WorkSheet中的单元格进行读写操作。

（7）保存Excel。

（8）释放资源。

封装的主要逻辑代码：
ExcelOp.h

#pragma once#include "stdafx.h" //OLE的头文件
#include "CRange.h"
#include "CWorkbook.h"
#include "CWorkbooks.h"
#include "CWorksheet.h"
#include "CWorksheets.h"
#include "CApplication.h"class CExcelOp
{public:CExcelOp(void);~CExcelOp(void);public:void ShowInExcel(BOOL bShow);///检查一个CELL是否是字符串//BOOL    IsCellString(long iRow, long iColumn);///检查一个CELL是否是数值//BOOL    IsCellInt(long iRow, long iColumn);void SetCell(long irow, long icolumn,CString new_string);///得到一个CELL的StringCString GetCell(long iRow, long iColumn);CString GetCellByName(CString rowName,CString colName);///得到整数//int     GetCellInt(long iRow, long iColumn);///得到double的数据//double  GetCellDouble(long iRow, long iColumn);///取得行的总数int GetRowCount();///取得列的总数int GetColumnCount();///使用某个shet，shit，shitBOOL LoadSheet(long table_index,BOOL pre_load = FALSE);///通过名称使用某个sheet，BOOL LoadSheet(const TCHAR* sheet,BOOL pre_load = FALSE);///通过序号取得某个Sheet的名称CString GetSheetName(long table_index);///得到Sheet的总数int GetSheetCount();///打开文件BOOL OpenExcelFile(const TCHAR * file_name);///关闭打开的Excel 文件，有时候打开EXCEL文件就要void CloseExcelFile(BOOL if_save = FALSE);//另存为一个EXCEL文件void SaveasXSLFile(const CString &xls_file);///取得打开文件的名称CString GetOpenFileName();///取得打开sheet的名称CString GetLoadSheetName();///写入一个CELL一个int//void SetCellInt(long irow, long icolumn,int new_int);///写入一个CELL一个string//void SetCellString(long irow, long icolumn,CString new_string);public:///初始化EXCEL OLEstatic BOOL InitExcel();///释放EXCEL的 OLEstatic void ReleaseExcel();///取得列的名称，比如27->AAstatic char *GetColumnName(long iColumn);protected://预先加载void PreLoadSheet(); public:///打开的EXCEL文件名称CString       open_excel_file_;CWorkbooks    m_Books;CWorkbook     m_Book;CWorksheets   m_sheets;CWorksheet    m_sheet;CRange        m_Rge;static CApplication m_app;///是否已经预加载了某个sheet的数据BOOL          already_preload_;///Create the SAFEARRAY from the VARIANT ret.COleSafeArray ole_safe_array_;LPDISPATCH m_lpDisp;  };

ExcelOp.cpp

#include "StdAfx.h"
#include "ExcelOp.h"#ifdef _DEBUG
#define new DEBUG_NEW
#endifCExcelOp::CExcelOp(void):already_preload_(FALSE)
{}CExcelOp::~CExcelOp(void)
{}COleVariant
covTrue((short)TRUE),
covFalse((short)FALSE),
covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);CApplication CExcelOp::m_app;//初始化EXCEL文件，
BOOL CExcelOp::InitExcel()
{ BOOL bRtn =FALSE ;TCHAR* ptchsExcel[]={_T("Excel.Application") //创建Excel 2000服务器(启动Excel) ,_T("Excel.Application.8")//Excel 97,_T("Excel.Application.9")//Excel 2000,_T("Excel.Application.10")//Excel xp,_T("Excel.Application.11")//Excel 2003,_T("Excel.Application.12")//Excel 2007,_T("Excel.Application.14")//Excel 2010};CLSID clsid;HRESULT hr = S_FALSE;for (int i= sizeof(ptchsExcel)/sizeof(*ptchsExcel)-1;i>=0;i--){#if 0if (m_app.CreateDispatch(ptchsExcel[i],NULL)) {break;}等同于下面的操作
#elsehr = CLSIDFromProgID(ptchsExcel[i], &clsid);if(SUCCEEDED(hr)){ hr = CoCreateInstance(clsid, NULL, CLSCTX_LOCAL_SERVER, IID_IDispatch, (void **)&m_app);if(SUCCEEDED(hr)) {bRtn = TRUE;}break;}
#endif}if (!bRtn){AfxMessageBox(_T("创建Excel服务失败,你可能没有安装EXCEL，请检查!")); return bRtn;}m_app.put_DisplayAlerts(FALSE); return bRtn;
}//
void CExcelOp::ReleaseExcel()
{ m_app.Quit();m_app.ReleaseDispatch();m_app=NULL;
}//关闭打开的Excel 文件,默认情况不保存文件
void CExcelOp::CloseExcelFile(BOOL if_save)
{//如果已经打开，关闭文件if (open_excel_file_.IsEmpty() == FALSE){//如果保存,交给用户控制,让用户自己存，如果自己SAVE，会出现莫名的等待if (if_save){ShowInExcel(TRUE);}else{m_Book.Close(COleVariant(short(FALSE)),COleVariant(open_excel_file_),covOptional);m_Books.Close();}//打开文件的名称清空open_excel_file_.Empty();}m_sheets.ReleaseDispatch();m_sheet.ReleaseDispatch();m_Rge.ReleaseDispatch();m_Book.ReleaseDispatch();m_Books.ReleaseDispatch();
}//打开excel文件
BOOL CExcelOp::OpenExcelFile(const TCHAR *file_name)
{//先关闭CloseExcelFile();//m_Books.AttachDispatch(m_app.get_Workbooks(),1);  //COleVariant varPath(file_name);  //m_Book.AttachDispatch(m_Books.Add(varPath));  //利用模板文件建立新文档 m_Books.AttachDispatch(m_app.get_Workbooks(),true); //LPDISPATCH lpDis = NULL;m_lpDisp = m_Books.Add(COleVariant(file_name)); if (m_lpDisp){m_Book.AttachDispatch(m_lpDisp); //得到Worksheets m_sheets.AttachDispatch(m_Book.get_Worksheets(),true); //记录打开的文件名称open_excel_file_ = file_name;return TRUE;}return TRUE;
}//
void CExcelOp::ShowInExcel(BOOL bShow)
{m_app.put_Visible(bShow);m_app.put_UserControl(bShow);
}void CExcelOp::SaveasXSLFile(const CString &xls_file)
{m_Book.SaveAs(COleVariant(xls_file),covOptional,covOptional,covOptional,covOptional,covOptional,0,covOptional,covOptional,covOptional,covOptional,covOptional);return;
}int CExcelOp::GetSheetCount()
{return m_sheets.get_Count();
}CString CExcelOp::GetSheetName(long table_index)
{CWorksheet sheet;sheet.AttachDispatch(m_sheets.get_Item(COleVariant((long)table_index)),true);CString name = sheet.get_Name();sheet.ReleaseDispatch();return name;
}//按照序号加载Sheet表格,可以提前加载所有的表格内部数据
BOOL CExcelOp::LoadSheet(long table_index,BOOL pre_load)
{LPDISPATCH lpDis = NULL;m_Rge.ReleaseDispatch();m_sheet.ReleaseDispatch();lpDis = m_sheets.get_Item(COleVariant((long)table_index));if (lpDis){m_sheet.AttachDispatch(lpDis,true);m_Rge.AttachDispatch(m_sheet.get_Cells(), true);}else{return FALSE;}already_preload_ = FALSE;//如果进行预先加载if (pre_load){PreLoadSheet();already_preload_ = TRUE;}return TRUE;
}//按照名称加载Sheet表格,可以提前加载所有的表格内部数据
BOOL CExcelOp::LoadSheet(const TCHAR* sheet,BOOL pre_load)
{LPDISPATCH lpDis = NULL;m_Rge.ReleaseDispatch();m_sheet.ReleaseDispatch();lpDis = m_sheets.get_Item(COleVariant(sheet));if (lpDis){m_sheet.AttachDispatch(lpDis,true);m_Rge.AttachDispatch(m_sheet.get_Cells(), true);}else{return FALSE;}//already_preload_ = FALSE;//如果进行预先加载if (pre_load){already_preload_ = TRUE;PreLoadSheet();}return TRUE;
}//得到列的总数
int CExcelOp::GetColumnCount()
{CRange range;CRange usedRange;usedRange.AttachDispatch(m_sheet.get_UsedRange(), true);range.AttachDispatch(usedRange.get_Columns(), true);int count = range.get_Count();usedRange.ReleaseDispatch();range.ReleaseDispatch();return count;
}//得到行的总数
int CExcelOp::GetRowCount()
{CRange range;CRange usedRange;usedRange.AttachDispatch(m_sheet.get_UsedRange(), true);range.AttachDispatch(usedRange.get_Rows(), true);int count = range.get_Count();usedRange.ReleaseDispatch();range.ReleaseDispatch();return count;
}//返回打开的EXCEL文件名称
CString CExcelOp::GetOpenFileName()
{return open_excel_file_;
}//取得打开sheet的名称
CString CExcelOp::GetLoadSheetName()
{return m_sheet.get_Name();
}//取得列的名称，比如27->AA
char *CExcelOp::GetColumnName(long icolumn)
{   static char column_name[64];size_t str_len = 0;while(icolumn > 0){int num_data = icolumn % 26;icolumn /= 26;if (num_data == 0){num_data = 26;icolumn--;}column_name[str_len] = (char)((num_data-1) + 'A' );str_len ++;}column_name[str_len] = '\0';//反转_strrev(column_name);return column_name;
}//预先加载
void CExcelOp::PreLoadSheet()
{CRange used_range;used_range = m_sheet.get_UsedRange();    VARIANT ret_ary = used_range.get_Value2();if (!(ret_ary.vt & VT_ARRAY)){return;}ole_safe_array_.Clear();ole_safe_array_.Attach(ret_ary);
}void CExcelOp::SetCell(long irow, long icolumn,CString new_string)
{COleVariant new_value(new_string);CRange start_range = m_sheet.get_Range(COleVariant(_T("A1")),covOptional);CRange write_range = start_range.get_Offset(COleVariant((long)irow -1),COleVariant((long)icolumn -1) );write_range.put_Value2(new_value);start_range.ReleaseDispatch();write_range.ReleaseDispatch();
}CString CExcelOp::GetCell(long iRow, long iColumn)
{  //_variant_t varRow(iRow);  //_variant_t varCol(iColumn); //COleVariant value;  //range.AttachDispatch(m_sheet.get_Cells(),TRUE);  //value=range.get_Item(varRow,varCol);                    //返回的类型是VT_DISPATCH 这是一个指针  //range.AttachDispatch(value.pdispVal,TRUE);  //VARIANT value2=range.get_Text();  //CString strValue=value2.bstrVal;  //return strValue;  COleVariant vResult ; //字符串if (already_preload_ == FALSE){m_Rge.AttachDispatch(m_Rge.get_Item (COleVariant((long)iRow),COleVariant((long)iColumn)).pdispVal, true);vResult =m_Rge.get_Value2();}//如果数据依据预先加载了else{long read_address[2];VARIANT val;read_address[0] = iRow;read_address[1] = iColumn;ole_safe_array_.GetElement(read_address, &val);vResult = val;}CString str;if(vResult.vt == VT_BSTR)       //字符串{str=vResult.bstrVal;}else if (vResult.vt==VT_INT){str.Format(_T("%d"),vResult.pintVal);}else if (vResult.vt==VT_R8)     //8字节的数字{str.Format(_T("%0.0f"),vResult.dblVal);//str.Format("%.0f",vResult.dblVal);//str.Format("%1f",vResult.fltVal);}else if(vResult.vt==VT_DATE)    //时间格式{SYSTEMTIME st;VariantTimeToSystemTime(vResult.date, &st);CTime tm(st);str=tm.Format(_T("%Y-%m-%d"));}else if(vResult.vt==VT_EMPTY)   //单元格空的{str=_T("");} m_Rge.ReleaseDispatch();return str;
} CString CExcelOp::GetCellByName(CString rowName,CString colName)
{  COleVariant value;  CString strValue;  long row=0,col=0;  long re_row=0,re_col=0;m_Rge.AttachDispatch(m_sheet.get_Cells(),TRUE);  for (row=1,col=1;col<m_Rge.get_Column();col++)  {  value=m_Rge.get_Item(_variant_t(row),_variant_t(col));                  //返回的类型是VT_DISPATCH 这是一个指针  m_Rge.AttachDispatch(value.pdispVal,TRUE);  VARIANT value2=m_Rge.get_Text();  CString strValue=value2.bstrVal;  if (strValue==colName)  break;  }  re_col=col;  for (row=1,row=1;row<m_Rge.get_Row();row++)  {  value=m_Rge.get_Item(_variant_t(row),_variant_t(col));                  //返回的类型是VT_DISPATCH 这是一个指针  m_Rge.AttachDispatch(value.pdispVal,TRUE);  VARIANT value2=m_Rge.get_Text();  CString strValue=value2.bstrVal;  if (strValue==rowName)        break;  }  re_row=row;  return GetCell(re_row,re_col);
}

4、效果截图：
Excel文件中“服饰”Sheet中提取“男装”记录。

操作Excel部分代码：

int nRows = m_excel->GetRowCount();int nCells  = m_excel->GetColumnCount();CString sCloth,sVal;int n=0;for (int i=1;i<nRows;i++){sCloth = m_excel->GetCell(i,1);if (sCloth == _T("男装")){sVal = m_excel->GetCell(i,2);CRange write_range = start_range.get_Offset(COleVariant((long)n),COleVariant((long)0)) ;write_range.put_Value2((COleVariant)(_T("男装")));write_range.ReleaseDispatch();write_range = start_range.get_Offset(COleVariant((long)n++),COleVariant((long)1)) ;write_range.put_Value2((COleVariant)(sVal));write_range.ReleaseDispatch();}}//for//http://www.tsingfun.combook.SaveAs(COleVariant(_T("d:\\2.xlsx")),covOptional,covOptional,covOptional,covOptional,covOptional,0,covOptional,covOptional,covOptional,covOptional,covOptional);  book.put_Saved(TRUE); //将Workbook的保存状态设置为已保存，即不让系统提示是否人工保存book.Close(covOptional,covOptional,covOptional);//关闭workbook对象books.Close(); sheet.ReleaseDispatch();//释放sheet对象sheets.ReleaseDispatch(); //释放sheets对象book.ReleaseDispatch();//释放workbook对象books.ReleaseDispatch(); //释放workbooks对象

源Excel：

生成的结果Excel：

C++使用OLE/COM高速读写EXCEL的源码相关推荐

使用NPOI导入导出标准Excel（源码）
http://www.cnblogs.com/lwme/archive/2011/11/18/npoi_excel_import_export.html 尝试过很多Excel导入导出方法,都不太理想, ...
java如何实现导出Excel(附源码)--文末送书
点击上方[全栈开发者社区]→右上角[...]→[设为星标⭐] 作者:你在我家门口 juejin.im/post/5c6b6b126fb9a04a0c2f024f 前言公司项目最近有一个需要:报表导出 ...
Ceph 学习——OSD读写流程与源码分析（一）
消息从客户端发送而来,之前几节介绍了客户端下对象存储.块存储库的实现以及他们在客户端下API请求的发送过程(Ceph学习--Librados与Osdc实现源码解析 . Ceph学习--客户端读写操 ...
Python 实现txt、excel、csv文件读写【附源码】
目录前言一.txt文件读写二.excel文件读写总结前言本文介绍使用Python进行文件读写操作,包括txt文件.excel文件(xlsx.xls.csv) 编译器使用的是PyCharm ...
Pandas处理Excel文件源码学习
pandas.read_excel pandas.read_excel API pandas.read_excel(io, sheet_name=0, header=0, names=None, in ...
golang RWMutex读写互斥锁源码分析
针对Golang 1.9的sync.RWMutex进行分析,与Golang 1.10基本一样除了将panic改为了throw之外其他的都一样. RWMutex是读写互斥锁.锁可以由任意数量的读取器或单 ...
若依框架Excel导出源码解析
入口 /*** 导出接收人列表*/@PostMapping("/export")@ResponseBodypublic AjaxResult export(Wxpusher wxp ...
JavaScript WebSocket NFC读写器示例源码
读写器介绍: RFID读写器NFC发卡器WEB可编程NDEF文本/网址/智能海报/电话/启动-淘宝网 (taobao.com)https://item.taobao.com/item.htm?spm= ...
使用建造者模式（Builder Pattern) 设计Excel导出场景，附源码
目录建造者模式(Builder Pattern)简单介绍: 常见Excel导出场景常见Excel 导出编码过程-结合过程查看代码本文中的Excel导出使用方式使用建造者模式设计Excel 导出 ...

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

C++使用OLE/COM高速读写EXCEL的源码相关推荐

最新文章

热门文章