主题：关于数据自动汇总写入到汇总表的问题

复制交叉统计表的代码，写到导入数据的代码后面即可。

http://www.foxtable.com/help/topics/2672.htm

 你做一个窗口，加一个按钮，用下面的代码，就能生成统计表了

Dim g As New CrossTableBuilder("订单汇总统计", DataTables("订单明细"))
g.HGroups.AddDef("销售订单")
g.HGroups.AddDef("客户简称")
g.VGroups.AddDef("产品名称")
g.Totals.AddDef("数量", "数量")
g.Build()
MainTable = Tables("订单汇总统计")

 建议用临时表，使用固定的表是多此一举。你的横向的列是不固定的，用固定表没有意义。

参考 http://www.foxtable.com/help/topics/0681.htm