以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  自动合计问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=56830)

--  作者:utcxray
--  发布时间:2014/9/13 9:50:00
--  自动合计问题
Dim Sum As Double
With CurrentTable
    Sum = .Aggregate(AggregateEnum.Sum, .TopRow, .LeftCol, .BottomRow, .RightCol)
End With

StatusBar.Message1 ="合计:\'" & Sum & "\'"

代码在全局表AFTERSELCHANGE中,为什么没显示

--  作者:Bin
--  发布时间:2014/9/13 10:07:00
--  
肯定有效,可能被其他内容覆盖了.最好写在SystemIdle
--  作者:utcxray
--  发布时间:2014/9/13 16:16:00
--  
问题已解决