Foxtable(狐表)用户栏目专家坐堂 → [求助]已解决,谢谢!请教高手这个如何统计?


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

主题:[求助]已解决,谢谢!请教高手这个如何统计?

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


加好友 发短信
等级:三尾狐 帖子:643 积分:3684 威望:0 精华:0 注册:2011/5/21 18:05:00
[求助]已解决,谢谢!请教高手这个如何统计?  发帖心情 Post By:2013/2/21 14:35:00 [只看该作者]

现在有原始数据表如下(改数据表每个小时输入一次)


图片点击可在新窗口打开查看此主题相关图片如下:01.jpg
图片点击可在新窗口打开查看
我需要统计每天当天每个人的产量和应付金额,但是最后一列如要统计每个人当月累计的应付金额,统计以后需要导出为excel表格,并且要两个小时导出一次,这样的统计代码又该如何写呢?

统计表的格式如下:

姓名   今日完成数量   今日应付金额   本月应付金额

[此贴子已经被作者于2013-2-25 15:28:14编辑过]

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/2/21 14:55:00 [只看该作者]

 把你的这个数据表上传上来。

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


加好友 发短信
等级:三尾狐 帖子:643 积分:3684 威望:0 精华:0 注册:2011/5/21 18:05:00
  发帖心情 Post By:2013/2/21 14:59:00 [只看该作者]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb


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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/2/21 15:27:00 [只看该作者]

 统计和保存,保存在了d盘。

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb



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


加好友 发短信
等级:三尾狐 帖子:643 积分:3684 威望:0 精华:0 注册:2011/5/21 18:05:00
  发帖心情 Post By:2013/2/21 17:18:00 [只看该作者]

以下是引用lin_hailun在2013-2-21 15:27:00的发言:
 统计和保存,保存在了d盘。

 下载信息  [文件大小:316.0 KB  下载次数:0]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.foxdb


你好,怎么能保存文件的时候文件名设置成当时的时间。


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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/2/21 17:51:00 [只看该作者]

 保存成一个excel不是更好?

 Tables("统计表").SaveExcel("d:\" & Formart(date.Now, "yyyy年MM月dd日HH时mm分ss秒") & ".xls", "统计表")

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


加好友 发短信
等级:三尾狐 帖子:643 积分:3684 威望:0 精华:0 注册:2011/5/21 18:05:00
  发帖心情 Post By:2013/2/22 11:19:00 [只看该作者]

出现错误了怎么回事?

 


图片点击可在新窗口打开查看此主题相关图片如下:130222.jpg
图片点击可在新窗口打开查看

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


加好友 发短信
等级:狐神 帖子:6708 积分:34304 威望:0 精华:11 注册:2012/8/18 23:10:00
  发帖心情 Post By:2013/2/22 11:24:00 [只看该作者]

 写错了。

 Tables("统计表").SaveExcel("d:\" & Format(date.Now, "yyyy年MM月dd日HH时mm分ss秒") & ".xls", "统计表")

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


加好友 发短信
等级:三尾狐 帖子:643 积分:3684 威望:0 精华:0 注册:2011/5/21 18:05:00
  发帖心情 Post By:2013/2/25 15:27:00 [只看该作者]

谢谢,已经解决了!

 回到顶部