Foxtable(狐表)用户栏目专家坐堂 → [求助]表格导出


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

主题:[求助]表格导出

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


加好友 发短信
等级:婴狐 帖子:29 积分:1563 威望:0 精华:0 注册:2016/5/11 8:50:00
[求助]表格导出  发帖心情 Post By:2021/6/28 10:26:00 [只看该作者]

如图所示,需要根据供应商名称分别将其对应的数据
图片点击可在新窗口打开查看此主题相关图片如下:问题.png
图片点击可在新窗口打开查看
导出到excel表格,请教该如何设置导出代码

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

意思是一个供应商导出一个表格?

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


加好友 发短信
等级:婴狐 帖子:29 积分:1563 威望:0 精华:0 注册:2016/5/11 8:50:00
  发帖心情 Post By:2021/6/28 10:59:00 [只看该作者]

是的,需要同时导出

 回到顶部
帅哥,在线噢!
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:111420 积分:567176 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2021/6/28 11:04:00 [只看该作者]

for each s as string in datatabls("表A").getvalues("供应商名称")
Dim ex as New Exporter
ex
.SourceTableName = "表A'指定导出表
ex.NewTableName = s
ex
.FilePath = "c:\Data\表A.xls" '指定目标文件
ex.Format = "Excel" '导出格式为Excel
ex.Filter = "[
供应商名称] = '" & s & "'" '指定导出条件
ex.Export() 
'开始导出
next

 回到顶部