Foxtable(狐表)用户栏目专家坐堂 → [求助]导出到Excel问题


  共有2727人关注过本帖树形打印复制链接

主题:[求助]导出到Excel问题

帅哥,在线噢!
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:106716 积分:542775 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By: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() 
'开始导出


 回到顶部