VC2008操作Excel2007总结

作者: Kagula

日期: 2010-12-22

概要

网上VC对Excel的操作资料虽然很多，但是很乱，这里做下总结，以后要用了可以参考，免得放在硬盘里时间一长找不到了。本文最后列出了主要的参考源，进一步信息可以从这些网站中获得。

代码段均在WinXP+SP3Excel2007 VS2008+SP1环境下调试通过。

这里对Excel OLE对象的调用方式采用了MFC的type Lib。

正文

准备工作

通过type Lib方式引入Excel OLE封装源码文件后，对要用到的头文件做修改。注释import语句，添加Excel对象引用代码（参考资源[2]），注释掉冲突的代码。

要引用哪对象就添加哪些对象的头文件，一般下面这些头文件是会被用到的。

#include "CApplication.h"

#include "CWorkbooks.h"

#include "CWorkbook.h"

#include "CWorksheets.h"

#include "CWorksheet.h"

 

打开Excel App对象

     CApplicationapp;

     if( !app.CreateDispatch(_T("Excel.Application")))

     {

         return false;

     }

 

 

新建Excel文件和Sheet

     CWorkbooks  books;

     CWorkbook    book;

     CWorksheets  sheets;

     CWorksheet   sheet;

     books=app.get_Workbooks();

     book=books.Add(covOptional);

     sheets=book.get_Sheets();

     sheet=sheets.get_Item(COleVariant((short)nSheetNumber));

一般nSheetNumber取值为1，即下面的代码将对第一张Sheet进行操作。

 

显示Excel报表（控件）

     app.put_Visible(TRUE);

     app.put_UserControl(TRUE);

 

打开已存在的Excel文件和Sheet

     books= app.get_Workbooks();

     book = books.Open(filename.GetBuffer(MAX_PATH),covOptional,covOptional,

         covOptional,covOptional,covOptional,covOptional,

         covOptional,covOptional,covOptional,covOptional,

         covOptional,covOptional,covOptional,covOptional);

     sheets =book.get_Worksheets();

     sheet=sheets.get_Item(COleVariant((short)nSheetNumber));

 

读取Excel文件中单元格的内容

     CRange      range;

     range = sheet.get_Range(COleVariant(startRange.GetBuffer(MAX_PATH)),

         COleVariant(endRange.GetBuffer(MAX_PATH)));

     COleVariantcov = range.get_Value2();

     CString str = (LPCWSTR)cov.bstrVal;

其中startRange和endRange为CString实例，是单元格的位置，例如“A1”、“A2”、“B1”等。

 

写Excel文件中单元格的内容

     CRange range;

     range=sheet.get_Range(COleVariant(startRange.GetBuffer(MAX_PATH)),COleVariant(endRange.GetBuffer(MAX_PATH)));

     range.put_Value2(COleVariant(strValue.GetBuffer(MAX_PATH)));

     //font=range.get_Font();

     //font.put_Bold(COleVariant((short)TRUE));

 

     //range.put_Formula(COleVariant(_T("=RAND()")));

     //range.put_NumberFormat(COleVariant(_T("$0.00")));

 

     //CRange      cols;

     //cols=range.get_EntireColumn();

     //cols.AutoFit();

这里设置了字符串类型，应该还能设置其它类型参数，比如说整型。解开上面代码中的注释，可以尝试下其它功能。参考资源[1]

 

释放资源

     books.Close();

     app.Quit();

     books.ReleaseDispatch();

     app.ReleaseDispatch();

上面这段代码建议有，因为读取Excel文件时，如果没有上面这段代码文件可能会被锁定。

参考资源

[1]《VS80开启Excel问题》

http://www.programmer-club.com.tw/ShowSameTitleN/vc/32776.html

[2]《vc 如何操作excel2003（注意一定是2003）编程》

http://zhidao.baidu.com/question/40379986.html?si=1

[3]《excel，合并了单元格后该如何定位？》

http://zhidao.baidu.com/question/112923672.html?si=3