易表在线答疑技术与交流用户社区 → 如何把表1各行的内容分解到表2的一列中去?


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

主题:如何把表1各行的内容分解到表2的一列中去?

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


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2009/2/3 12:00:00 [显示全部帖子]

有缺陷。
假如表一第二列中的两行数据字符不相等,假如不止两行数据都会出现问题。

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


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2009/2/3 12:03:00 [显示全部帖子]

这样试试。
表2预处理公式或自定义按钮公式:

ClearGrid(grid) And AddRows(grid,(Len(ListFor("表1","第二列"))-3)/2) And evalfor(grid,"第二列","Mid(Substitute(ListFor(""表1"",""第二列""),""|"",""""),2*(Row-1),2)") And evalfor(grid,"第一列","FindText(""表1"",""第一列"",""第二列"",""Instr"",[第二列])")


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


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2009/2/3 17:02:00 [显示全部帖子]

[这个贴子最后由Czy在 2009/02/03 05:39pm 第 1 次编辑]

全部汉字,我原来的公式稍改一下就可以达到相同效果,加粗为修改项。

ClearGrid(grid) And AddRows(grid,(Len(ListFor("表1","第二列"))-[表1!Rows]-1)/2) And evalfor(grid,"第二列","Mid(Substitute(ListFor(""表1"",""第二列""),""|"",""""),2*(Row-1),2)") And evalfor(grid,"第一列","FindText(""表1"",""第一列"",""第二列"",""Instr"",[第二列])")


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


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2009/2/3 17:40:00 [显示全部帖子]

下面引用由付强2009/02/03 05:12pm 发表的内容:
CZY老师的功能一样,虽然句子长了点但只须一条。一并感谢了。

公式长不到哪去的,但如果数据大速度会有所提升。


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


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2009/2/4 0:23:00 [显示全部帖子]

format只支持格式化112个字节,所以8楼也是行不通的。

这个问题以前倒是解决过,不过比较费脑,还是免了。


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


加好友 发短信
等级:超级版主 帖子:13147 积分:-89 威望:0 精华:0 注册:2006/8/11 11:14:00
  发帖心情 Post By:2009/2/6 11:52:00 [显示全部帖子]

不同数据用不同的方法对待,你这个文件完全可以参照另一贴的方法进行解决。
所不同的是先要将第二列的数据用Format进行格式化(文件中的数据Format能支持)。

 回到顶部