主题：希望导出EXCEL时只导显示的行（不包括隐藏行）

这样不行吗？

…………

ex.Filter = Tables("绩效计划表").Filter

ex.Export() '开始导出

你不是已经指定了Fields吗，导出是按Fields指定列进行排序的。

设置Fields不会有问题的，如果再不行发文件上来。

测试没问题。

 

Dim ex As New Exporter
ex.SourceTableName = "表A"
ex.FilePath = "f:\test.xls"
ex.Format = "Excel"
ex.Filter = "[第一列] In ('a','d')"
ex.Export()

这段代码本身就不包括隐藏行的。