社区
Delphi
帖子详情
不用OLE如何读写Excel文件?
hfrui
2004-04-11 03:14:03
好像有很多控件,不知道哪个好些。
...全文
70
3
打赏
收藏
不用OLE如何读写Excel文件?
好像有很多控件,不知道哪个好些。
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
3 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
ghchen
2004-06-14
打赏
举报
回复
关注
web700
2004-04-11
打赏
举报
回复
用流的方式试试..
dance_code
2004-04-11
打赏
举报
回复
花一年的时间来研究EXCEL是怎么工作和文件格式 :)
微软
ole
方式
读写
excel
文件
电脑上需安装vs2010,微软的
excel
软件,软件才可以运行。
读写
速度还比较理想,一万条数据/32个字段,10s左右就可以全部加载出来,显示在mfc的控件上。对比过其它的odbc等方式,这个算快的了。源代码是c++
VC++(VS2010)
读写
Excel
文件
代码(附示例)
【前言】 工作或学习中可能需要实现基于VC读\写
Excel
文件
的功能,本人最近也遇到了该问题。中间虽经波折,但是最终还是找到了解决问题的办法。 在此跟大家分享,希望对跟我同样迷茫过的同学们有所帮助。 1、程序功能 1)打开一个
excel
文件
; 2)显示到CListCtrl上; 3)新建一个
Excel
文件
。 以上均在对话框中实现。 2、平台 VC++2010 3、实现方法 常用的
Excel
打开方式有两种 1)通过数据库打开; 2)
OLE
方式打开。 由于方式1)操作繁琐,经常出现莫名的错误,这里选用方式2). 4、准备步骤 首先新建一个Dialog窗体程序,添加list control和两个按钮 1)将
Excel
Lib
文件
夹拷贝到程序目录下; 2)将Export2
Excel
.h,Export2
Excel
.cpp两个
文件
添加到项目; 3)包含头
文件
,#include "
Excel
Lib/Export2
Excel
.h" 通过以上步骤在程序中引入了可以读取Excle
文件
的CExport2
Excel
类; 5、打开
excel
文件
通过按钮点击打开 void C
Excel
TestDlg::OnBnClickedButtonOpen
Excel
() { //获取
文件
路径 CFileDialog* lpszOpenFile; CString szGetName; lpszOpenFile = new CFileDialog(TRUE,"","",OFN_FILEMUSTEXIST|OFN_HIDEREADONLY,"
Excel
File(*.xlsx;*.xls)|*.xls;*.xlsx",NULL); if (lpszOpenFile->DoModal()==IDOK) { szGetName = lpszOpenFile->GetPathName(); SetWindowText(szGetName); delete lpszOpenFile; } else return; //打开
文件
//
文件
中包含多个sheet时,默认打开第一个sheet CExport2
Excel
Excel
_example;
Excel
_example.Open
Excel
(szGetName); //获取sheet个数 int iSheetNum =
Excel
_example.GetSheetsNumber(); //获取已使用表格行列数 int iRows =
Excel
_example.GetRowCount(); int iCols =
Excel
_example.GetColCount(); //获取单元格的内容 CString cs_temp =
Excel
_example.GetText(1,1); //AfxMessageBox(cs_temp); //List control上显示 //获取工作表列名(第一行) CStringArray m_HeadName; m_HeadName.Add(_T("ID")); for (int i=1;iGetItemCount()>0) { m_list.DeleteColumn(0); } //初始化ClistCtrl,加入列名 InitList(m_list,m_HeadName); //填入内容 //第一行是标题,所以从第2行开始 CString num; int pos; for (int row = 2;row<=iRows; row++) { pos = m_list.GetItemCount(); num.Format(_T("%d"),pos +1); m_list.InsertItem(pos,num); for (int colum=1;columDoModal()==IDOK) { szGetName = lpszOpenFile->GetPathName(); SetWindowText(szGetName); delete lpszOpenFile; } else return; //
文件
全名称 CString csFileName = szGetName; //需要添加的两个sheet的名称 CString csSheetName = "newSheet"; CString csSheetName2 = "newSheet2"; // 新建一个
excel
文件
,自己写入文字 CExport2
Excel
Excel
_example; //新建
excel
文件
Excel
_example.Create
Excel
(csFileName); //添加sheet,新加的sheet在前,也就是序号为1
Excel
_example.CreateSheet(csSheetName);
Excel
_example.CreateSheet(csSheetName2); //操作最开始添加的sheet:(newSheet)
Excel
_example.SetSheet(2); //添加表头
Excel
_example.WriteHeader(1,"第一列");
Excel
_example.WriteHeader(2,"第二列"); //添加核心数据
Excel
_example.WriteData(1,1,"数据1");
Excel
_example.WriteData(1,2,"数据2"); //保存
文件
Excel
_example.Save(); //关闭
文件
Excel
_example.Close(); } 7、注意事项 1)一般单个
Excel
文件
包含多个sheet,程序默认打开第一个; 2)指定操作sheet,使用
Excel
_example.SetSheet(2)函数; 3)打开
文件
时最左侧的sheet序号为1,新建
excel
时最新添加的sheet序号为1. 【后记】 本程序主要基于网络CSDN中---“
Excel
封装库V2.0”---完成,下载地址是:http://download.csdn.net/detail/yeah2000/3576494,在此表示感谢!同时, 1)在其基础上作了小改动,改正了几个小错误,添加了几个小接口; 2)添加了如何使用的例子,原程序是没有的; 3)详细的注释 发现不足之处,还请大家多多指教!
VC
OLE
方式
读写
EXCEL
VC/MFC 通过
OLE
方式
读写
EXCEL
2003
文件
,解决了很多ODBC方式导致的缺陷!
OLE
读取
EXCEL
(VS2015+QT)
利用
OLE
技术对
Excel
文件
进行读取!通过加载动态链接库到内存的方式,对
excel
进行高速读取!
VC/MFC直接
读写
Excel
数据
通过一个编译好的类,进行对
Excel
进行读的,操作。手动输入
excel
内容,可以完成读的操作,仅供学习使用。 QQ:leon_mr@qq.com,喜欢VC MFC的可以加一起共同探讨。
Delphi
5,402
社区成员
262,733
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章