MFC vs2012 Office2013 读写excel文件

最新推荐文章于 2021-12-13 15:40:39 发布

转载最新推荐文章于 2021-12-13 15:40:39 发布 · 274 阅读

博主在小项目中需实现txt和excel文件读写。文中展示了相关代码，包括初始化代码，还分别给出了写Excel和读Excel的代码示例，写操作涉及设置单元格内容、字体、公式等，读操作则是获取单元格内容并输出。

转自：http://www.cnblogs.com/tianya2543/p/4165997.html?utm_source=tuicool&utm_medium=referral
近期在忙一个小项目（和同学一起搞的），在这里客户要求不但读写txt，而且可以读写excel文件，这里本以为很简单，结果。。。废话少说，过程如下：

笔者环境：win7 64+VS2012+Office2013+MFC。

说明：读写excel文件，通常包括1.ODBC数据库实现;2.通过解析Excel表格文件;3.通过OLE/COM的几种实现方法。本文主要研究通过OLE/COM实现对Excel表格的操作。

步骤：

  1.新建MFC对话框。注意勾选自动化，否则后面加入不了需要的库，导致启动服务失败等错误。有的博客说需要加入

1 if (!AfxOleInit())
2 {
3 AfxMessageBox(IDP_OLE_INIT_FAILED);
4 return FALSE;
5 }
笔者实验发现加不加入都没有问题，如果后面有人有问题可以加入。

    2.向项目工程中添加基本的7个类（Excel作为OLE/COM库插件，定义好了各类交互的接口，这些接口是跨语言的接口。VC可以通过导入这些接口，并通过   接口来对Excel的操作）,由于本文只关心对Excel表格中的数据的读取，主要关注7个接_Application、Workbooks、_Workbook、Worksheets、_Worksheet、Range、Font。

       VS2012导入OLE/COM组件的接口的步骤为：项目->类向导->添加类->类型库中的MFC类，先选择要导入的组件所在的路径，即Excel.exe所在的路      径，然后再选择要导入的Excel类型库中的接口。组件路径一般为C:\Program Files\Microsoft Office\Office15\EXCEL.exe;格式类似。

    3. 导入之后需要“#import "C:\\Program Files\\Microsoft Office\\Office12\\EXCEL.EXE" no_namespace”注释掉，然后添加头文                 件：#include <afxdisp.h>到上面7个文件中去。

    4.如果有错误error C2059双击error C2059，将VARIANT DialogBox()改成VARIANT _DialogBox()再次编译，通过！！

    5.读写excel。

              在对话框头文件中*Dlg.h定义变量

复制代码
1 //定义接口类变量
2 CApplication app;
3 CWorkbook book;
4 CWorkbooks books;
5 CWorksheet sheet;
6 CWorksheets sheets;
7 CRange range;
8 CMyFont font;
9 CRange cols;
10 LPDISPATCH lpDisp;
复制代码
a.写excel,在*Dlg.cpp里面的OnInitDialog函数添加代码：

复制代码
1 //导出
2 COleVariant covOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR);
3 if (!app.CreateDispatch(_T(“Excel.Application”)))
4 {
5 this->MessageBox(_T(“无法创建Excel应用！”));
6 return TRUE;
7 }
8 books = app.get_Workbooks();
9 //打开Excel，其中pathname为Excel表的路径名
10
11 book = books.Add(covOptional);
12 sheets = book.get_Worksheets();
13 sheet = sheets.get_Item(COleVariant((short)1)); //获得坐标为（A，1）和（B，1）的两个单元格
14 range = sheet.get_Range(COleVariant(_T(“A1”)), COleVariant(_T(“B1”))); //设置单元格类容为Hello Exce
15 range.put_Value2(COleVariant(_T(“Hello Excel”))); //选择整列，并设置宽度为自适应
16 cols = range.get_EntireColumn();
17 cols.AutoFit();
18 //设置字体为粗体
19 font = range.get_Font();
20 font.put_Bold(COleVariant((short)TRUE));
21 //获得坐标为（C，2）单元格
22 range = sheet.get_Range(COleVariant(_T(“C2”)), COleVariant(_T(“C2”)));
23 //设置公式“=RAND()*100000”
24 range.put_Formula(COleVariant(_T("=RAND()*100000")));
25 //设置数字格式为货币型
26 range.put_NumberFormat(COleVariant(_T("$0.00")));
27 //选择整列，并设置宽度为自适应
28 cols = range.get_EntireColumn();
29 cols.AutoFit();
30 //显示Excel表
31 app.put_Visible(TRUE);
32 app.put_UserControl(TRUE);
复制代码
结果如下

         b.导入excel，同样在*Dlg的位置添加代码：

复制代码
1 //导入
2 COleVariant covOptional((long)DISP_E_PARAMNOTFOUND,VT_ERROR);
3 if (!app.CreateDispatch(_T(“Excel.Application”)))
4 {
5 this->MessageBox(_T(“无法创建Excel应用！”));
6 return TRUE;
7 }
8 books = app.get_Workbooks();
9 //打开Excel，其中pathname为Excel表的路径名
10 lpDisp = books.Open(_T(“D:\VS2012\Projects\TestExcelApp2\TestExcelApp2\工作薄1.xlsx”),covOptional ,covOptional,covOptional,covOptional,covOptional,covOptional,covOptional,covOptional,covOptional,covOptional,covOptional,covOptional,covOptional,covOptional);
11 book.AttachDispatch(lpDisp);
12 sheets = book.get_Worksheets();
13 sheet = sheets.get_Item(COleVariant((short)1));
14 //获得坐标为（A，1）的单元格
15 range = sheet.get_Range(COleVariant(_T(“A1”)) ,COleVariant(_T(“A1”)));
16 //获得单元格的内容
17 COleVariant rValue;
18 rValue = COleVariant(range.get_Value2());
19 //转换成宽字符
20 rValue.ChangeType(VT_BSTR);
21 //转换格式，并输出
22 this->MessageBox(CString(rValue.bstrVal));
23 book.put_Saved(TRUE);
24 app.Quit();
复制代码
效果如下：

     excel内容：

       

    读到第一行第一列元素：

        

笔者只是需要读取excel的读写功能，所以只是做了这方面的实验，可以用到自己的项目中，所以共大家分享一下。有什么问题可以留言，共勉！