| 以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 列数非常多有几十个，怎么写列合计比较好 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=61429) |
| -- 作者：Bin -- 发布时间：2014/12/12 10:39:00 -- 横向合计? 表达式的话一个个写吧 |
| -- 作者：Bin -- 发布时间：2014/12/12 10:56:00 -- [列1]+[列2] |
| -- 作者：有点甜 -- 发布时间：2014/12/12 11:10:00 -- 循环各个列，组合起来某些列。
或者直接写死列名。 |
| -- 作者：有点甜 -- 发布时间：2014/12/12 11:37:00 -- Dim str As String = "" For Each c As Col In Tables("表A").Cols If c.IsNumeric Then str &= "isnull(" & c.Name & ",0)+" End If Next msgbox(str.Trim("+")) |