主题：新版本有关汇总代码不生效问题？

应该这样吧：：：
Dim t As Table = Tables("库存捆包查询_Table1")
Dim g As SubtotalGroup
t.SubtotalGroups.Clear()
g = New SubtotalGroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "要汇总的列"
g.TotalOn = "重量,件数"
g.Caption = "*"        '注意总计分组用符号*表示.
t.SubtotalGroups.Add(g)
t.Subtotal()

看帮组：设置汇总模式 ，这是标准的啊～  不可能对*号列做汇总吧，你那样只是对整个表做一个总的合计。
你要的结果是怎样的呢？ 贴个图来看看，

很早就有这个问题，我是用
currenttable.position = currenttable.count-2
currenttable.position = currenttable.count-1
强行定位的大多数情况可以解决（但偶尔也失灵？）

分组行没试过，可能要
currenttable.position = currenttable.rows(true).count-1 或
currenttable.position = currenttable.count(true)-1

哈哈 要执行两次才行， 老大怕大家太轻闲了···

还有这个对分组行无效～～～？？
currenttable.position = currenttable.rows(true).count-1 或
currenttable.position = currenttable.count(true)-1

因为分组行的位置就是 -1 这表示没有行了···