- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 虚拟统计表导出数据后EXCL列名称与统计表列名称不同 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=123101)
-- 发布时间：2018/8/7 22:25:00
-- 虚拟统计表导出数据后EXCL列名称与统计表列名称不同
统计表代码：
Dim g As New CrossTableBuilder("当前库存", DataTables("溯源码"))
Dim dt As fxDataSource
g.HGroups.AddDef("商品编码")
g.HGroups.AddDef("商品名称")
g.VGroups.AddDef("当前所在部门")
g.Totals.AddDef("子溯源码", AggregateEnum.Count, "当前库存", True)
dt = g.BuildDataSource()
Tables("库存_Table1").DataSource = dt \'将统计结果绑定到Table
统计表：
此主题相关图片如下：qq截图20180807165328.png
此主题相关图片如下：qq截图20180807165328.png导出EXCL代码：
Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog
dlg.Filter= "EXC.文件|*.xls" \'设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮
Dim ex As New Exporter
ex.SourceTableName = "库存_Table1" \'指定导出表
ex.filepath = dlg.FileName \'指定目标文件
ex.Format = "Excel" \'导出格式为Excel
ex.Export() \'开始导出
End If
导出EXCL截图：
此主题相关图片如下：qq截图20180807222524.png
导出后EXCL文档:
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:2.xls |
我如何做能让导出列名相同？
[此贴子已经被作者于2018/8/7 22:26:33编辑过]
-- 发布时间：2018/8/7 22:37:00
--
1、这种方式导出：http://www.foxtable.com/webhelp/scr/1148.htm
2、导出后再用代码改Execl表格列名
-- 发布时间：2018/8/8 10:24:00
--
但是门店名称是不固定的个数和不固定的名称的
-- 发布时间：2018/8/8 10:36:00
--
参考
http://www.foxtable.com/webhelp/scr/0559.htm