Foxtable(狐表)用户栏目专家坐堂 → 请教:Excel报表中的总计代码


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

主题:请教:Excel报表中的总计代码

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


加好友 发短信
等级:幼狐 帖子:130 积分:874 威望:0 精华:0 注册:2008/8/31 21:32:00
  发帖心情 Post By:2009/4/28 0:11:00 [显示全部帖子]

试试

Sheet(r1+1, c).Value = dt.Compute("Sum(" & Tables("表名").Cols(c).Name & ")")

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


加好友 发短信
等级:幼狐 帖子:130 积分:874 威望:0 精华:0 注册:2008/8/31 21:32:00
  发帖心情 Post By:2009/4/28 1:29:00 [显示全部帖子]

首先Sum聚合函数的计算需要给出列的名称

你定义的的dt 可能是DataTable,  目前狐表DataTable不直接支持由列的编号得到列的名称

而通过Table 的Cols 可以由列的编号得到列的名称.  用Tables的时候当然就要指定表名.  如果是对当前表进行统计,  你还可以用CurrentTable,  就省了表名.

Sheet(r1+1, c).Value = dt.Compute("Sum(" & CurrentTable.Cols(c).Name & ")")


 回到顶部