Foxtable(狐表)用户栏目专家坐堂 → 如何按要求导出表格?


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

主题:如何按要求导出表格?

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


加好友 发短信
等级:婴狐 帖子:20 积分:214 威望:0 精华:0 注册:2017/10/31 15:18:00
如何按要求导出表格?  发帖心情 Post By:2017/10/31 23:48:00 [只看该作者]

表的数据有十几万条,导出一个excel容不下,考虑按“客户经理”导出excel,怎么样才能导出表格并按客户经理名称命名表,只导出一个excel文档。
[此贴子已经被作者于2017/11/1 8:39:01编辑过]

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2017/11/1 8:53:00 [只看该作者]

你导出成xlsx的话,十几万条数据是可以容纳的。

 

如果要分类导出,参考代码

 

Dim dt As Table = Tables("表A")
For Each jl As String In dt.DataTable.GetValues("第一列")
    dt.Filter = "第一列 = '" & jl & "'"
    dt.SaveExcel("d:\test.xlsx", jl)
Next


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


加好友 发短信
等级:婴狐 帖子:20 积分:214 威望:0 精华:0 注册:2017/10/31 15:18:00
  发帖心情 Post By:2017/11/1 8:57:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:汇总3.txt
上传表格,希望得到大家帮助

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


加好友 发短信
等级:婴狐 帖子:20 积分:214 威望:0 精华:0 注册:2017/10/31 15:18:00
  发帖心情 Post By:2017/11/1 9:17:00 [只看该作者]

完美解决,谢谢版主

 回到顶部