易表在线答疑技术与交流用户社区 → 导出格式


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

主题:导出格式

帅哥哟,离线,有人找我吗?
wjq1072
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2010/9/16 16:24:00 [显示全部帖子]

按钮公式:
Eval("EvalFor(Grid,"""+Substitute(Substitute(Eval("Substitute(""|@|"",""|"","""+Substitute(ListCols(Grid),"|",""")+""|""+Substitute(""|@|"",""|"",""")+""")"),"@",""",""char(9)+["),"|","]"") And EvalFor(Grid,""")+"]"")") And ExportDBFile(docdir+"测试.xls",6,GridName) And Eval("EvalFor(Grid,"""+Substitute(Substitute(Eval("Substitute(""|@|"",""|"","""+Substitute(ListCols(Grid),"|",""")+""|""+Substitute(""|@|"",""|"",""")+""")"),"@",""",""Substitute(["),"|","],char(9),"""""""")"") And EvalFor(Grid,""")+"],char(9),"""""""")"")")

-=-=-=- 以下内容由 wjq10722010年09月16日 04:26pm 时添加 -=-=-=-
导出后查看易表文件所在路径的“测试”文件。

 回到顶部
帅哥哟,离线,有人找我吗?
wjq1072
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2010/9/16 16:45:00 [显示全部帖子]

呵呵,对字符列有效!

 回到顶部
帅哥哟,离线,有人找我吗?
wjq1072
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2010/9/16 17:37:00 [显示全部帖子]


 回到顶部
帅哥哟,离线,有人找我吗?
wjq1072
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2010/9/16 19:21:00 [显示全部帖子]

下面引用由hbfnmxb2010/09/16 04:52pm 发表的内容:
有没有办法把数值列的数据保留?

按钮公式:
Eval("CreateGrid(""AA"","""+Substitute(ListCols(Grid),"|",""",0,""")+""",0)") And ClearGrid("AA") And CopyRows("AA") And DelRow("AA",1) And Eval("EvalFor(""AA"","""+Substitute(Substitute(Eval("Substitute(""|@|"",""|"","""+Substitute(ListCols(Grid),"|",""")+""|""+Substitute(""|@|"",""|"",""")+""")"),"@",""",""char(9)+["),"|","]"") And EvalFor(""AA"",""")+"]"")") And ExportDBFile(docdir+"测试.xls",6,"AA") And RemoveGrid("AA")

 回到顶部