以文本方式查看主题

-  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=172061)

--  作者:昱飞哥
--  发布时间:2021/9/21 10:14:00
--  [求助]关于分组统计标题的问题

图片点击可在新窗口打开查看此主题相关图片如下:1.jpg
图片点击可在新窗口打开查看


如图,按“销售日期”分组统计,分组标题默认为“{0}月小计”。那我想把分组标题设置为“某年某月小计”怎么写代码?
也就是如图,把“8月小计”变成“2021年8月小计”,且标题会根据实际年份月份的不同而不同。
Dim g1 As New Subtotalgroup \'定义一个新的分组
        g1.GroupOn = "销售日期" \'分组列为"日期"列
        g1.TotalOn = "销售额元,支出总额元,毛利润元,净利润元" \'对这些列进行统计
        With Tables("主页_Table40")
            .SubtotalGroups.Clear() \'清除原有的分组
            .SubtotalGroups.Add(g1) \'加入刚刚定义的分组
            .Subtotal() \'生成汇总模式
        End With

--  作者:y2287958
--  发布时间:2021/9/21 10:19:00
--  
http://www.foxtable.com/webhelp/topics/1964.htm