设置合计模式

关于合计模式，我们已经在《使用指南》中介绍过，参考：合计模式
本节介绍如何通过代码设置合计模式。

和汇总模式相比，本节介绍的合计模式设置简单，功能单一，只有一个总的合计行。
但合计模式有个极大的优点，在此模式下，你可以正常编辑数据、增加行、删除行，还可以进行筛选和排序等操作，合计结果会即时刷新，而之前介绍的汇总模式，数据是只读的。

合计模式和汇总模式各有优势，一个可以编辑数据，一个功能强大，我们可以根据需要选用。

要设置合计模式很简单，以上图的合计模式为例，只需三行代码：

Tables("订单").Cols("数量").GrandTotal = True '指定要合计的列
Tables("订单").Cols("金额").GrandTotal = True
Tables("订单").GrandTotal = True '显示合计模式

如果要关闭合计模式，将GrandTotal属性设置为False即可：

Tables("订单").GrandTotal = False

合计模式经常用于在关联子表显示一个合计行，自动合计子表数据：

以上图为例，要在关联子表中显示一个合计行，代码为：

With Tables("产品.订单")
    .Cols("数量").GrandTotal = True '指定要合计的列
    .Cols("金额").GrandTotal = True
    .GrandTotal = True '显示合计模式
End With