Foxtable(狐表) → 用户栏目 → 专家坐堂 → 读取Excel报表问题


  共有2283人关注过本帖树形打印复制链接

主题：读取Excel报表问题
美女呀，离线，留言给我吧！
Springamy
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：427 积分：2969 威望：0 精华：0 注册：2017/4/6 15:51:00 		读取Excel报表问题  发帖心情 Post By：2017/8/17 17:50:00 [显示全部帖子]

问题如图: 这是一个批量读取的按钮,因实际需求,现在有的Excel会有两个采购订单号或者多个,

在导入文件的时候已经对表做了addnew()的操作,所以现在只能读取第一个采购订单编号,

请问我怎么判断在读取到sheet1(7,0).value不是空值的时候添加一行,(如果是在s1(k)赋值之后再判断添加,在循环里面,会添加多行,不符合实际需求)

 


图片点击可在新窗口打开查看此主题相关图片如下：1.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：2.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：3.png
图片点击可在新窗口打开查看
 回到顶部
美女呀，离线，留言给我吧！
Springamy
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：427 积分：2969 威望：0 精华：0 注册：2017/4/6 15:51:00 		  发帖心情 Post By：2017/8/18 9:39:00 [显示全部帖子]

以下是引用有点甜在2017/8/17 19:05:00的发言：

msgbox(sheet1(7, i).Text)

If sheet1(7, i).Text > "" Then

 

End If

甜大,改了也还是没达到效果,是不是我思路不对阿,在循环里面addnew,会不断的增加行


图片点击可在新窗口打开查看此主题相关图片如下：1.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：2.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下：3.png
图片点击可在新窗口打开查看
 回到顶部
美女呀，离线，留言给我吧！
Springamy
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：427 积分：2969 威望：0 精华：0 注册：2017/4/6 15:51:00 		  发帖心情 Post By：2017/8/18 10:23:00 [显示全部帖子]

以下是引用有点甜在2017/8/18 9:42:00的发言：

加在第一个循环的后面，也就是

 

for i as integer = 3 to sheet1.Rows.count-1

    If sheet1(7, i).Text > "" Then

 

    End If

数据更加不对了,看例子


 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:模拟采购订单.rar

 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:提货申请表-苏州xxx项目增补.xls
 回到顶部
美女呀，离线，留言给我吧！
Springamy
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：一尾狐 帖子：427 积分：2969 威望：0 精华：0 注册：2017/4/6 15:51:00 		谢谢  发帖心情 Post By：2017/8/18 11:38:00 [显示全部帖子]

谢谢甜大,果然思路最重要,我一直停留在先全部循环一遍再判断的胡同里图片点击可在新窗口打开查看

 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 6 次数据查询