新手，刚用foxtable,有问题请教

原表为：

现想分组导出数据为excel，同时把字段名改为汉字，如下：

应如何做才能实现呢？ 不熟悉啊，最好能详细些

看看:

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

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:管理项目43.zip

多谢解答，不过可能前面我没说清楚，我想实现的有两个：（1）按部门分别生成xls,即N个部门生成N个xls; (2)原有的列名为英文，生成xls时换成汉字

按部门导出，我想可以用：

Dim ex As New Exporter
ex.SourceTableName = "bm"
ex.FilePath = "c:\\a.xls"
ex.Format = "Excel"
ex.Filter = "[bm] = \'a\'"
ex.Export()

但是，还有两个问题：（1）如何设循环来导出每一个部门？实现每个部门一个xls，（2）如何把用部门的名字来命名导出的xls？实现a.xls,b.xls

For Each nm As String In DataTables("xxx").GetUniqueValues("","bm")
    Dim ex As New Exporter
    ex.SourceTableName = "bm"
    ex.FilePath = "c:\\" & nm & ".xls"
    ex.Format = "Excel"
    ex.Filter = "[bm] = \'" & nm & "\'"
    ex.Export()
Next

参考：

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

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