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