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


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

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

美女呀,离线,留言给我吧!
yangming
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
请教:Excel报表中的总计代码  发帖心情 Post By:2009/4/27 20:25:00 [显示全部帖子]

这是我的代码,意思是在表格的最后一行,逐列求和,请教,红色行错在何处?

For c As Integer = 5 To dt.Cols.Count -2 '
    Sheet(r1+1, c).Value = dt.Compute("Sum("& c &")")

    Sheet(r1+1, c).Style= Style
Next

 


 回到顶部
美女呀,离线,留言给我吧!
yangming
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/4/27 21:44:00 [显示全部帖子]

你的方法我试过的,还是出错,不过还是要谢谢你啊

[此贴子已经被作者于2009-4-27 21:47:52编辑过]

 回到顶部
美女呀,离线,留言给我吧!
yangming
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/4/27 22:33:00 [显示全部帖子]

如果只是计算一个数量列,而又没有条件,就用:Total = DataTables("订单").Compute("Sum(数量)"),我是要逐列求和,就不明白如何做了

 回到顶部
美女呀,离线,留言给我吧!
yangming
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/4/28 0:39:00 [显示全部帖子]

谢谢ybtxdz,我不明白,这里为何要加表名呢?

 回到顶部
美女呀,离线,留言给我吧!
yangming
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/4/28 1:05:00 [显示全部帖子]

谢谢ybtxdz,我只是不明白,这里为何要加入表名呢?

 回到顶部
美女呀,离线,留言给我吧!
yangming
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信 一级勋章
等级:超级版主 帖子:4109 积分:23338 威望:0 精华:21 注册:2008/9/1 20:07:00
  发帖心情 Post By:2009/4/28 15:15:00 [显示全部帖子]

明白了,呵呵,看来还是没搞清楚DataTable和Table 的区别,再次感谢!

 回到顶部