Foxtable(狐表)用户栏目专家坐堂 → [求助]导出数据分组排序求助


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

主题:[求助]导出数据分组排序求助

帅哥哟,离线,有人找我吗?
智友软件工作室
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:912 积分:7445 威望:0 精华:0 注册:2013/2/25 13:10:00
[求助]导出数据分组排序求助  发帖心情 Post By:2015/12/13 17:24:00 [只看该作者]

目前导出的数据如下图,序号在数据库中的表是不存在的

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20151213172248.png
图片点击可在新窗口打开查看
我想实现导出数据后能够自动按照销售进行分组然后添加序号,如下图:

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20151213172458.png
图片点击可在新窗口打开查看

模版文件如下:
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:标准导出.xls






[此贴子已经被作者于2015/12/13 17:36:21编辑过]

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/12/13 17:33:00 [只看该作者]

方法1、用excel报表导出;

 

方法2、动态加一列,然后排序,然后赋值,然后再导出。


 回到顶部
帅哥哟,离线,有人找我吗?
智友软件工作室
  3楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:四尾狐 帖子:912 积分:7445 威望:0 精华:0 注册:2013/2/25 13:10:00
  发帖心情 Post By:2015/12/13 17:37:00 [只看该作者]

这个是最优的方法吗?如果是 我就这样做了


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/12/13 19:09:00 [只看该作者]

用excel报表,是最简单的。

 

自己编写代码导出的话,处理是最灵活的。也就是先排序,然后编码导出


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


加好友 发短信
等级:幼狐 帖子:136 积分:1427 威望:0 精华:0 注册:2013/8/7 18:14:00
  发帖心情 Post By:2015/12/26 14:39:00 [只看该作者]

你好,方法2、动态加一列,然后排序,然后赋值,然后再导出。在狐表SQl查询中的具体怎么实现?以上面的数据为例
[此贴子已经被作者于2015/12/26 14:43:15编辑过]

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/12/26 15:01:00 [只看该作者]

增加列:http://www.foxtable.com/help/topics/1428.htm

 

排序:http://www.foxtable.com/help/topics/1432.htm

 

赋值:

For Each dr As Row In Tables("表A").Rows
    dr("序号") = dr.Index
Next

 

导出:http://www.foxtable.com/help/topics/0683.htm

 


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


加好友 发短信
等级:幼狐 帖子:136 积分:1427 威望:0 精华:0 注册:2013/8/7 18:14:00
  发帖心情 Post By:2016/1/5 14:27:00 [只看该作者]

图片点击可在新窗口打开查看
赋值没法如上图按微信号按相同分组分别排序赋值

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/5 14:33:00 [只看该作者]

回复7楼。

 

1、上传具体例子和代码

 

2、用excel可以直接指定排序啊 http://www.foxtable.com/help/topics/1397.htm

 


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


加好友 发短信
等级:幼狐 帖子:136 积分:1427 威望:0 精华:0 注册:2013/8/7 18:14:00
  发帖心情 Post By:2016/1/5 14:55:00 [只看该作者]

放在EXCEL表中了
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:相同分组分别排序.xls


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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2016/1/5 15:08:00 [只看该作者]

逻辑是什么?同一天的重新排序?

 

DataTables("表B").DataCols.Add("序号", Gettype(Double))
For Each rq As String In DataTables("表B").GetValues("日期", "日期 is not null")
    Dim idx As Integer = 0
    For Each dr As DataRow In DataTables("表B").Select("日期 = #" & rq & "#")
        dr("序号") = idx
        idx += 2
    Next
Next


 回到顶部
总数 16 1 2 下一页