Foxtable(狐表)用户栏目专家坐堂 → [原创]Excel导出加载所有数据的问题


  共有1811人关注过本帖平板打印复制链接

主题:[原创]Excel导出加载所有数据的问题

帅哥哟,离线,有人找我吗?
yiningyl
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:婴狐 帖子:28 积分:466 威望:0 精华:0 注册:2018/3/26 18:04:00
[原创]Excel导出加载所有数据的问题  发帖心情 Post By:2018/4/16 23:43:00 [只看该作者]

我有加载树,每页显示一百条, 其实有好多页, 我用下面的代码,只能靠手选择当前一条,或多条,反正超不过100条,
Dim Book As New XLS.Book(ProjectPath & "Attachments\jtxxb_list.xls")
Dim fl As String = ProjectPath & "Reports\家庭信息表.xls"
Book.Build() '生成细节区
Book.Save(fl) '保存工作簿
Dim Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()

怎样才能导出所有筛选出来的数据呢?

 回到顶部