主题：如何导出表中的部分列内容

现在要将表中导出为EXCEL文件，如何只导出部分列，设计了一个导出按纽，对应语法如何写，谢谢

 你用哪种方法导出？Exporter是可以设置要导出的列的。

 

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

 

杂项中的导出 EXCEL这个功能

Syscmd.Project.ExportToExcel()

导出为Excel文件

我现在只想导出部分列的内容。如何写代码啊

看2楼啊。

好的，谢谢

Dim  dlg As New  SaveFileDialog '定义一个新的SaveFileDialog
dlg.Filter=  "Excel文件|*.xls" '设置筛选器
If dlg.ShowDialog =  DialogResult.Ok Then  '如果用户单击了确定按钮
    Dim ex As New Exporter
    ex.Format = "Excel"
    ex.Fields = "第一列,第二列"
    ex.SourceTableName = CurrentTable.name '指定导出表
    ex.filepath = dlg.FileName  '指定目标文件
    ex.Export() '开始导出
End If

导出的文件中前面有个逗号啊？

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

点击浏览该文件:员工.xls

Dim  dlg As New  SaveFileDialog '定义一个新的SaveFileDialog
dlg.Filter=  "Excel文件|*.xls" '设置筛选器
If dlg.ShowDialog =  DialogResult.Ok Then  '如果用户单击了确定按钮
    Dim t As Table = Tables("表A")
    Dim tvcs As String = t.getColVisibleWidth
    t.SetColVisibleWidth("第一列|98|第二列|98")
    t.SaveExcel(dlg.FileName, t.name)
    t.SetColVisibleWidth(tvcs)
End If