- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]合计模式 里面的总计数据怎么提取？ (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=107911)
-- 发布时间：2017/10/12 13:30:00
-- [求助]合计模式 里面的总计数据怎么提取？
Dim t As Table = Tables("Sale")
Dim g As Subtotalgroup
t.SubtotalGroups.Clear()
t.GroupAboveData = False
t.TreeVisible = False
t.SpillNode = True
g = New Subtotalgroup
g.Aggregate = AggregateEnum.Sum
g.GroupOn = "*"
g.TotalOn = "SaleTotal"
g.Caption = "总计"
t.SubtotalGroups.Add(g)
t.Subtotal()
我用这个代码生成了合计，我怎提取这个总计数据呢？
此主题相关图片如下：捕获.png
此主题相关图片如下：捕获.png-- 发布时间：2017/10/12 13:49:00
--
此主题相关图片如下：捕获2.png
下这个表我是用菜单设置的合计，这个合计数 又是怎么提取？
此主题相关图片如下：捕获1.png
-- 发布时间：2017/10/12 13:51:00
--
我希望的是提取这两个表的合计总数进行对比处理！在线等 谢谢！
-- 发布时间：2017/10/12 14:13:00
--
参考代码
Dim r As Row = Tables("表A").Rows(Tables("表A").count(True)-1, True)
msgbox(r("第一列"))
-- 发布时间：2017/10/12 16:27:00
--
搞定了 谢谢！