VS2010 MFC读取Excel文件中数据

VS2010 MFC读取Excel文件中数据前段时间写个工具需要从Excel文件中读取数据,Excel表格数据列数为确定值,行数不确定,从网上搜了些方法尝试,最终达到目的,总结如下:

大家好,又见面了,我是你们的朋友全栈君。

前段时间写个工具需要从Excel文件中读取数据,Excel表格数据列数为确定值,行数不确定,从网上搜了些方法尝试,最终达到目的,总结如下:

1. 新建一个基于对话框的MFC应用程序

2. 添加Excel相关类

打开类向导,添加类下拉框选择类型库中的MFC类,来源选择注册表(不容易出错),可用的类型库选择”Microsoft Excel …”(根据Excel的版本有所不同);接口选择:_Application,_WorkSheet,_WorkBook,Range,WorkSheets,WorkBooks;添加6个必要的类CApplication,CWorkbook,CWorksheet,CRange,CWorkbooks,CWorksheets

VS2010 MFC读取Excel文件中数据

3. 添加完成后,找到相关头文件,注释或删除:

//#import "D:\\Program Files (x86)\\Microsoft Office\\Office14\\EXCEL.EXE" no_namespace

在stdafx.h中添加:

#include "CApplication.h"
#include "CRange.h"
#include "CWorkbook.h"
#include "CWorkbooks.h"
#include "CWorksheet.h"
#include "CWorksheets.h"

4. 编译出现错误:

1>e:\vs2010_project\demo\mfcexcel\crange.h(335): warning C4003: “DialogBoxW”宏的实参不足
1>e:\vs2010_project\demo\mfcexcel\crange.h(335): error C2059: 语法错误:“,”

解决方法:定位错误信息,在CRange类中将DialogBox()改为_DialogBox()

	VARIANT _DialogBox()
	{
		VARIANT result;
		InvokeHelper(0xf5, DISPATCH_METHOD, VT_VARIANT, (void*)&result, NULL);
		return result;
	}

5. 获取Excel文件路径全名(包括文件名)

添加一个打开文件按钮和显示路径的编辑框,按钮单击消息处理函数:

void COfflineDlg::OnBnClickedButtonOpenfile()
{
	// TODO: 在此添加控件通知处理程序代码
	CFileDialog file(TRUE,NULL,NULL,OFN_HIDEREADONLY|OFN_OVERWRITEPROMPT,  
		_T("EXCEL文件(*.xls;*.xlsx)|*.xls;*.xlsx||"),AfxGetMainWnd());  
	if(file.DoModal()==IDOK)  
	{  
		strPath=file.GetPathName();  
		GetDlgItem(IDC_EDIT_FilePath)->SetWindowText(strPath);
	}  
}

strPath为CString类型的对话框成员变量,用于存储路径

6. 读取Excel中数据

添加一个读取数据按钮,按钮单击消息处理函数:

void COfflineDlg::OnBnClickedButtonReaddata()
{
	// TODO: 在此添加控件通知处理程序代码
	if("" == strPath)
	{
		theApp.ShowInfo(_T("请先选择文件"));
		return;
	}

	GetDlgItem(IDC_BUTTON_ReadData)->EnableWindow(FALSE);
	theApp.ShowInfo(_T("读取数据..."));

	CApplication app;	//Excel程序
	CWorkbooks books;	//工作簿集合
	CWorkbook book;		//工作簿
	CWorksheets sheets;	//工作表集合 
	CWorksheet sheet;	//工作表
	CRange range;		//使用区域

	COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);  
	if (!app.CreateDispatch(_T("Excel.Application")))  
	{  
		MessageBox(_T("Error!Creat Excel Application Server Fail!"));  
		exit(1);  
	}  

	books.AttachDispatch(app.get_Workbooks(),true); 
	book.AttachDispatch(books.Add(_variant_t(strPath)));//获取选择的Excel文件
	sheets.AttachDispatch(book.get_Worksheets(),true);//获取文件中的所有sheet
	sheet.AttachDispatch(sheets.get_Item(_variant_t("sheet1")),true);//获取sheet1区域

	vstrCycleSets.clear();
	vstrCmdSeque.clear();
	vstrSendData.clear();
	vstrExpectData.clear();
	vstrTimeout.clear();
	vstrCheck.clear();
	vstrCycleCnt.clear();

	CString str;
	bool bExit = false;
	for(int irow=2;!bExit;irow++)
	{
		for(int icolumn=1;icolumn<8;icolumn++)
		{
			range.AttachDispatch(sheet.get_Cells(),true);//获取sheet1所有的单元格,重置当前区域为A1
			range.AttachDispatch(range.get_Item (COleVariant((long)irow),COleVariant((long)icolumn)).pdispVal);//获取单元格
			switch(icolumn)
			{
			case 1: str = range.get_Value2(); 
					if(str.IsEmpty())
					{
						bExit = true; 
						break;
					}
					vstrCycleSets.push_back(str); 
					break;
			case 2: str = range.get_Value2();
					vstrCmdSeque.push_back(str);
					break;
			case 3: str = range.get_Value2();
					str.Replace(" ", "");
					vstrSendData.push_back(str);
					break;
			case 4: str = range.get_Value2();
					str.Replace(" ", "");
					vstrExpectData.push_back(str);
					break;
			case 5: str = range.get_Value2();
					vstrTimeout.push_back(str);
					break;
			case 6: str = range.get_Value2();
					vstrCheck.push_back(str);
					break;
			case 7: str = range.get_Value2();
					vstrCycleCnt.push_back(str);
					break;
			default: ;
			}
			if(bExit)
			{
				break;
			}
		}
	}

	range.ReleaseDispatch();//释放对象
	sheet.ReleaseDispatch();
	sheets.ReleaseDispatch();
	book.ReleaseDispatch();  
	books.ReleaseDispatch();    
	app.ReleaseDispatch(); 
	app.Quit();//退出Excel程序

	if(!vstrCycleSets.empty())
	{
		theApp.ShowInfo(_T("读取数据成功"));
	}
	else
	{
		theApp.ShowInfo(_T("读取数据失败"));
	}

	GetDlgItem(IDC_BUTTON_ReadData)->EnableWindow(TRUE);
}

我读取的Excel表格数据列数固定为7,数据不确定所以行数不确定,第一行为表头,所以从第二行A2单元格开始读,通过Ai是否为空来判断数据是否读完。采用容器来保存数据对象比较方便,容器定义为对话框成员变量:

	//存储Excel读取的数据
	vector<CString> vstrCycleSets;
	vector<CString> vstrCmdSeque;
	vector<CString> vstrSendData;
	vector<CString> vstrExpectData;
	vector<CString> vstrTimeout;
	vector<CString> vstrCheck;
	vector<CString> vstrCycleCnt;

至此,就完成了从Excel中读取数据。

我们都是站在巨人的肩膀上,参考资料:

http://blog.csdn.net/u013507368/article/details/42143913

http://blog.csdn.net/jason___bourne/article/details/39643419

http://blog.csdn.net/fkzh2651/article/details/12185611

http://blog.csdn.net/tc297520702/article/details/20745457

http://blog.csdn.net/wangzhiyang925/article/details/37572695

版权声明:本文内容由互联网用户自发贡献,该文观点仅代表作者本人。本站仅提供信息存储空间服务,不拥有所有权,不承担相关法律责任。如发现本站有涉嫌侵权/违法违规的内容, 请联系我们举报,一经查实,本站将立刻删除。

发布者:全栈程序员-站长,转载请注明出处:https://javaforall.net/150086.html原文链接:https://javaforall.net

(0)
全栈程序员-站长的头像全栈程序员-站长


相关推荐

  • DHCP option82_dhcp中继配置命令

    DHCP option82_dhcp中继配置命令option82是dhcp报文中的中继代理信息选项(relayagentinformationoption)。当dhcpclient发送请求报文到dhcpserver时,若需要经过dhcp中继,则由dhcp中继将option82添加到请求报文中。option82包含很多sub-option,本文中的option82只支持sub-option1、sub-option2和sub-

    2022年8月31日
    1
  • 公众号发送模板消息

    公众号发送模板消息场景:当用户在公众号中发起了一笔支付,后台给用户发送一个消息。微信配置:用的个人公众号测试,访问地址https://mp.weixin.qq.com/debug/cgi-bin/sandbox?t=sandbox/login&token=1212530455&lang=zh_CN(1)配置域名:(2)配置模板消息(3)修改网…

    2022年5月1日
    45
  • Mobx入门和较佳实践

    Mobx入门和较佳实践

    2021年6月18日
    102
  • 安卓 toast_安卓toast使用

    安卓 toast_安卓toast使用概述一个toast是在屏幕上弹出一条信息,它的大小总是包裹着需要显示的内容,并且当前的Activity依然是可见并且可互动的。toast会自动消失,并且不接受任何互动事件。因为toast可以在后台的 Service 中创建,所以即使这个应用程序没有显示在屏幕上,仍然可以弹出toast.toast最好用来显示简要的信息,比如断定用户正在注意屏幕时,弹出”Fil

    2022年9月12日
    0
  • 有没有支持5V输入和9V输入给两串8.4V锂电池充电的芯片IC「建议收藏」

    有没有支持5V输入和9V输入给两串8.4V锂电池充电的芯片IC「建议收藏」有的FS4062支持5V和9V同步升降压充电8.4V两床锂电池,也就是5V9V适配器自动识别两串8.4V锂电池高效充电管理芯片概述:FS4062是一款宽电压输入,专门为7.4V双节锂电池充电的充电管理芯片,兼容5V,9V适配器。在5V供电的情况下,实现升压充电,电池端最大充电电流1.3A,在9V供电的情况下,实现降压充电,电池端最大充电电流1.2A,充电电流可以通过外置电阻RSET来设定。低阻抗的电源通路可以使充电效率更高,减少充电时间,提高电池使用寿命。.

    2022年10月6日
    0
  • mysql econnreset_node使用knex连接mysql,每个小时大概率出现:read ECONNRESET?

    mysql econnreset_node使用knex连接mysql,每个小时大概率出现:read ECONNRESET?我有一个node程序每小时查询一次本地数据库马上再查询一次内网数据库,仅在查询内网数据库时出现readECONNRESET。使用npm库knex+mysql2连接数据库,knex配置如下(有使用连接池)require(‘knex’)({client:’mysql2′,connection:{host:’127.0.0.1′,user:’your_database_user’,pass…

    2022年6月17日
    39

发表回复

您的邮箱地址不会被公开。 必填项已用 * 标注

关注全栈程序员社区公众号