Foxtable(狐表)用户栏目专家坐堂 → 请问如何实现导出当前页内容?


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

主题:请问如何实现导出当前页内容?

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


加好友 发短信
等级:幼狐 帖子:81 积分:659 威望:0 精华:0 注册:2018/9/1 17:32:00
请问如何实现导出当前页内容?  发帖心情 Post By:2018/10/25 9:40:00 [只看该作者]

问题:我设计一个筛选控件对表进行筛选,现在需要导出保存所筛选的内容,如何实现?谢谢。

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107739 积分:548028 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/10/25 10:12:00 [只看该作者]


 回到顶部
帅哥哟,离线,有人找我吗?
skyerlin
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:81 积分:659 威望:0 精华:0 注册:2018/9/1 17:32:00
  发帖心情 Post By:2018/10/25 11:28:00 [只看该作者]

老师,我是想先在窗口进行筛选,点击导出按钮直接导出筛选后内容。但使用以下代码后,还需对表进行选择才能导出,我想跳过对表选择。

Dim Book As New XLS.Book(ProjectPath & "Attachments\出库单.xls")
Dim 
fl As String = ProjectPath & "Reports\出库单.xls"
Book.Build() 
'生成细节区
Book.Save(fl) 
'保存工作簿
Dim 
Proc As New Process '打开工作簿
Proc.File = fl
Proc.Start()

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107739 积分:548028 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2018/10/25 11:32:00 [只看该作者]


 回到顶部