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的String
CString 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，shit
BOOL 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 OLE
static BOOL InitExcel();
///释放EXCEL的 OLE
static void ReleaseExcel();
///取得列的名称，比如27->AA
static 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
#endif

CExcelOp::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 0

if (m_app.CreateDispatch(ptchsExcel[i],NULL))
{
break;
}
等同于下面的操作
#else
hr = 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.com

book.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：