社区
Delphi
帖子详情
读取Excel单元格中的内容时,遇到“#N/A”错误信息,如何判断?
zhoufs
2019-12-19 04:51:26
用delphi读取 Excel单元格内容时,某些单元格中是Excel的错误信息: “#N/A”,如何判断它,避免出现: Invalid variant type conversion
...全文
482
1
打赏
收藏
读取Excel单元格中的内容时,遇到“#N/A”错误信息,如何判断?
用delphi读取 Excel单元格内容时,某些单元格中是Excel的错误信息: “#N/A”,如何判断它,避免出现: Invalid variant type conversion
复制链接
扫一扫
分享
转发到动态
举报
写回复
配置赞助广告
用AI写文章
1 条
回复
切换为时间正序
请发表友善的回复…
发表回复
打赏红包
doloopcn
2019-12-19
打赏
举报
回复
在转换之前先判断单元格的类型是否能被转换,一般在Delphi中用Try...Except测试
N
Excel
读取
excel
文件类
.net
读取
excel
文件类 .
利用NOPI到处
Excel
时
,Cell
内容
自动换行
利用NOPI到处
Excel
时
,Cell
内容
自动换行;
excel
页码函数
excel
页码函数,在
excel
中
自定义页码,附件仅供学习
n
excel
c#
excel
n
excel
,c#实现对
EXCEL
操作 不需要第三方空间
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)详细的注释 发现不足之处,还请大家多多指教!
Delphi
5,930
社区成员
262,938
社区内容
发帖
与我相关
我的任务
Delphi
Delphi 开发及应用
复制链接
扫一扫
分享
社区描述
Delphi 开发及应用
社区管理员
加入社区
获取链接或二维码
近7日
近30日
至今
加载中
查看更多榜单
社区公告
暂无公告
试试用AI创作助手写篇文章吧
+ 用AI写文章