以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 导出不用多层表头 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=154778) |
-- 作者:刘林 -- 发布时间:2020/9/26 21:08:00 -- 导出不用多层表头 Dim dlg As New SaveFileDialog \'定义一个新的SaveFileDialog dlg.Filter= "Excel文件|*.xls" \'设置筛选器 If dlg.ShowDialog = DialogResult.Ok Then \'如果用户单击了确定按钮 Tables("建档核查_table1").SaveExcel(dlg.FileName, "建档就读台帐") \'保存文件 End If Dim Proc As New Process Proc.File = dlg.FileName Proc.Start() 老师,由于想导出表不用多层表头,因为导出的表处理后有可能要导入,所以如果用多层表导涉及列名发生变改变,与数据表的字段不一致了,我想请问如何导出不为多层表头
|
-- 作者:有点蓝 -- 发布时间:2020/9/27 9:31:00 -- 1、先关闭多层表头:http://www.foxtable.com/webhelp/topics/1992.htm 2、导出代码 3、再启用多层表头
|