VS2010环境使用MFC操作读取excel2003文件

原文为:http://blog.csdn.net/icyfox_bupt/article/details/6318979

              http://wenku.baidu.com/view/d7383548767f5acfa1c7cd30.html

    http://blog.csdn.net/chasemylov/archive/2010/08/27/5844826.aspx

    http://blog.csdn.net/SP_daiyq/archive/2011/02/17/6191233.aspx

使用软件:VS2010 excel版本 2003  *.xls

 亲测可用

 变动:

  之所以找的困难,很大一部分是因为代码不能转移。现在说一下主要的变动,应该是版本的问题。

 1、  字符串前加上L,如L"fox",这是unicode的原因。

 2、  有些函数不一样了,与第一个链接,比如GetValue,现在应该写成get_value,这都是笔者一下下调对的,还有一些代码有错误,不过至少下面的代码运行无误。

1. 建立MFC工程,MDI(基于对话框),在创建工程的向导中选中Automation选项(自动化选项)即可为程序自动添加相应的头文件和OLE库初始化代码。

通过查看源代码,可以知道在stdafx.h的头文件中,添加了OLE/COM很多类所需添加的头文件。

#include         // MFC 自动化类

同时,在应用程序类的InitInstance函数中(在***.cpp中查看,不是***Dlg.cpp),添加了OLE/COM的初始化代码,如下所示:

// 初始化 OLE 库

if (!AfxOleInit())

{

AfxMessageBox(IDP_OLE_INIT_FAILED);

return FALSE;

}


2. 操作Excel文件初始化:

  a. project->add class->MFC class from typelib (项目->添加类->Typelib中的MFC类),来源里面请选择“注册表”  然后再可选择的类型库中选择“Microsoft Excel ****”这样容易不出错,如下图所示:

VS2010环境使用MFC操作读取excel2003文件_第1张图片

 b. 选中以下几项_Application,_WorkSheet,_WorkBook,WorkSheets,WorkBooks,Range,然后导入;

VS2010环境使用MFC操作读取excel2003文件_第2张图片

   c. 导入后自动在工程中添加CApplication,CWorkSheet,CWorkBook,CWorkSheets,CWorkBooks,CRange这些类;然后需要把这些类的头文件中的第一句话 #import ".......EXCEL.EXE" nonamespace 删除; 

 d.在stdafx.h中加入这几个头文件:view plaincopy

  1. #include "CApplication.h"  
  2. #include "CRange.h"  
  3. #include "CWorkbook.h"  
  4. #include "CWorkbooks.h"  
  5. #include "CWorksheet.h"  
  6. #include "CWorksheets.h"  


  
编译一下程序,会发现有两条错误

解决方法是在CRange类中,

[cpp] view plaincopy
  1. VARIANT DialogBox()  
  2. {  
  3.   VARIANT result;  
  4.   InvokeHelper(0xf5, DISPATCH_METHOD, VT_VARIANT, (void*)&result, NULL);  
  5.   return result;  
  6. }  

DialogBox()前面添加下划线变成_DialogBox(),解决了!


3.操作excel文件

      在“资源”里面选择MFC自动建立的对话框,双击“打开”按钮(若没有就自己做一个),然后程序会将你到对这个按钮的函数里,在函数中写如下内容: (文件是CxxxDlg.cpp  xxx是你的项目名称)

[html] view plaincopy
  1. void Cexcel打开3Dlg::OnBnClickedOk()  
  2. {  
  3.     // TODO: 在此添加控件通知处理程序代码  
  4.     CApplication app;  
  5.     CWorkbooks books;  
  6.     CWorkbook book;  
  7.     CWorksheets sheets;  
  8.     CWorksheet sheet;  
  9.     CRange range;  
  10.     CRange iCell;  
  11.     LPDISPATCH lpDisp;  
  12.     COleVariant vResult;  
  13.     COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);  
  14.     if(!app.CreateDispatch(L"Excel.Application"))  
  15.     {  
  16.     AfxMessageBox(L"无法启动Excel服务器!");  
  17.     return;  
  18.     }  
  19.     books.AttachDispatch(app.get_Workbooks());  
  20.     lpDisp = books.Open(“D:\\test.xls”,covOptional, covOptional, covOptional, covOptional, covOptional,covOptional, covOptional, covOptional, covOptional, covOptional,covOptional, covOptional, covOptional,covOptional);  //需要在D盘下新建test.exl
  21.       
  22.     //得到Workbook  
  23.     book.AttachDispatch(lpDisp);  
  24.     //得到Worksheets  
  25.     sheets.AttachDispatch(book.get_Worksheets());  
  26.    
  27.     //得到当前活跃sheet  
  28.     //如果有单元格正处于编辑状态中,此操作不能返回,会一直等待  
  29.     lpDisp=book.get_ActiveSheet();  
  30.     sheet.AttachDispatch(lpDisp);  
  31.     //读取第一个单元格的值  
  32.     range.AttachDispatch(sheet.get_Cells());  
  33.     range.AttachDispatch(range.get_Item (COleVariant((long)2),COleVariant((long)1)).pdispVal );  
  34.     /*COleVariant*/ vResult =range.get_Value2();  
  35.     CString str;  
  36.     if(vResult.vt == VT_BSTR) //字符串  
  37.     {  
  38.     str=vResult.bstrVal;  
  39.     }  
  40.     else if (vResult.vt==VT_R8) //8字节的数字  
  41.     {  
  42.     str.Format(L"%f",vResult.dblVal);  
  43.     }  
  44.    
  45.     /*else if(vResult.vt==VT_DATE) //时间格式  
  46.     {  
  47.     SYSTEMTIME st;  
  48.     VariantTimeToSystemTime(&vResult.date, &st);  
  49.     }  
  50.     else if(vResult.vt==VT_EMPTY) //单元格空的  
  51.     {  
  52.     str="";  
  53.     }*/    
  54.     books.Close();   
  55.     app.Quit();             // 退出  
  56.     //释放对象    
  57.     range.ReleaseDispatch();  
  58.     sheet.ReleaseDispatch();  
  59.     sheets.ReleaseDispatch();  
  60.     book.ReleaseDispatch();  
  61.     books.ReleaseDispatch();  
  62.     app.ReleaseDispatch();  
  63.     OnOK();  
  64.     MessageBox(str);  
  65. }  

开始有一个教程没有如下代码(上一个代码框已包含)

[cpp] view plaincopy

  1.         books.Close();   
  2.         app.Quit();             // 退出  
  3. //释放对象    
  4. range.ReleaseDispatch();  
  5. sheet.ReleaseDispatch();  
  6. sheets.ReleaseDispatch();  
  7. book.ReleaseDispatch();  
  8. books.ReleaseDispatch();  
  9. app.ReleaseDispatch();  
这样会导致程序在关闭以后仍然有excel的进程存在,文件不关闭,使用以上代码后解决。

 运行结果是,程序会将D:\\test.xls打开,并且在对话框中输入格(1,1)的数据。


你可能感兴趣的:(MFC学习,c++,mfc,visual,studio,2010,excel)