以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  [求助]导出到Excel问题  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=174547)
--  作者：martin723
--  发布时间：2022/1/20 12:11:00
--  [求助]导出到Excel问题

Exporter用于导出数据。


我利用Exporter导出到Excel，结果导出的数据是整个数据表的内容，而不是现在筛选出来的数据。

能否只导出当前表显示的行的数据？或者怎么获取当前表的整个筛选条件？


比如我先用日期范围进行了一次筛选，又用部门进行了筛选，最后呈现的是日期和部门的筛选结果。多次筛选手工操作的筛选条件怎么能保存到一个筛选条件里？

[此贴子已经被作者于2022/1/20 12:13:30编辑过]
--  作者：有点蓝
--  发布时间：2022/1/20 13:34:00
--  

ex.Filter = tables("xx表").filter


Exporter

Exporter用于导出数据。

属性

  • SourceTableName
    字符型，指定导出表的名称。
     
  • Filter
    字符型，指定导出条件表达式；    请参考表达式的运算符和函数 和 条件表达式。

示例四

将产品PD01的订单导出为Excel格式保存，并只导出指定的列：

Dim ex as New Exporter
ex.SourceTableName = "订单" \'指定导出表
ex.FilePath = "c:\\Data\\订单.xls" \'指定目标文件
ex.Format = "Excel" \'导出格式为Excel
ex.Fields = "日期,客户,数量,单价,产品" \'指定导出字段
ex.Filter = "[产品] = \'PD01\'" \'指定导出条件
ex.Export() \'开始导出
--  作者：martin723
--  发布时间：2022/1/20 13:59:00
--  
谢谢！