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


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

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

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


加好友 发短信
等级:论坛游民 帖子:57 积分:0 威望:0 精华:0 注册:2007/9/3 11:00:00
如何把表1各行的内容分解到表2的一列中去?  发帖心情 Post By:2009/2/3 9:08:00 [只看该作者]

有表一各行如下
1:一二三四五六七八九十
2:甲乙丙丁戊已庚辛壬癸
.......
想把这 n 行内容分解为单字放到表2中形如:
1:一
1:二
1:三
1:四
......
2:甲
2:乙
2:丙
2:丁
......
注:冒号“:”前为第一列,冒号“:”后为第二列。egd文件下载

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


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2009/2/3 11:36:00 [只看该作者]


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


加好友 发短信
等级:管理员 帖子:868 积分:828 威望:0 精华:0 注册:2006/8/11 16:15:00
  发帖心情 Post By:2009/2/3 11:39:00 [只看该作者]

厉害!

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


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2009/2/3 11:48:00 [只看该作者]

贺老师过奖啦

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


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

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

 回到顶部
帅哥哟,离线,有人找我吗?
Czy
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | 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"",[第二列])")


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


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2009/2/3 12:33:00 [只看该作者]

下面引用由czy2009/02/03 00:00pm 发表的内容:
有缺陷。
假如表一第二列中的两行数据字符不相等,假如不止两行数据都会出现问题。

谢谢总班提醒!其实我知道,肯定不通用。我是就认他两行、中文、相等来的。

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


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2009/2/3 13:29:00 [只看该作者]

看看这个能不能通用(多行、不等、中英数)

egd文件下载


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


加好友 发短信
等级:超级版主 帖子:16190 积分:125850 威望:1 精华:0 注册:2006/8/12 12:29:00
  发帖心情 Post By:2009/2/3 14:46:00 [只看该作者]

楼主怎么啦??

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


加好友 发短信
等级:论坛游民 帖子:57 积分:0 威望:0 精华:0 注册:2007/9/3 11:00:00
  发帖心情 Post By:2009/2/3 15:05:00 [只看该作者]

楼主刚回来,报歉。
感谢各位大侠出手,完全满足要求。

-=-=-=- 以下内容由 付强2009年02月03日 03:09pm 时添加 -=-=-=-
WJQ1072的最后答案,堪称精典,永久收藏。

-=-=-=- 以下内容由 付强2009年02月03日 03:16pm 时添加 -=-=-=-
Eval("Split("""+ListFor("表1","k")+""",""|"",Row)")
这句是咋想出来的,真是妙极了。

-=-=-=- 以下内容由 付强2009年02月03日 03:37pm 时添加 -=-=-=-
当表1第二列汉字大于35时出错,可能是嵌套超过限度吧。

 回到顶部
总数 23 1 2 3 下一页