易表在线答疑技术与交流用户社区 → 请各位大师帮我解决这个难题


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

主题:请各位大师帮我解决这个难题

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


加好友 发短信
等级:超级版主 帖子:2320 积分:350 威望:0 精华:0 注册:2006/8/11 10:55:00
  发帖心情 Post By:2006/12/7 22:12:00 [显示全部帖子]

如要超出22个中文限制,也可改操作公式:

IF([A] <> "",SetCellText(GridName,Row,"12","") And Eval(Substitute(Rept("And EvalFor(GridName,""12"",""[12]+"""" """"+FindText(""""字典正文"""",""""拼音1"""",""""字"""", """"="""",Mid(TRIM([A]),(Len([12]) - Len(Substitute([12],"""" """","""""""")))*2,2))"",Row,Row)",INT(Len(TRIM([A]))/2)+1),"And ","",1)), True )

-=-=-=- 以下内容由 ylm2006年12月07日 10:16pm 时添加 -=-=-=-
缺点:标点符号必须全角,另中文中夹杂英文或数字如字符数成单数就会出错.


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


加好友 发短信
等级:超级版主 帖子:2320 积分:350 威望:0 精华:0 注册:2006/8/11 10:55:00
  发帖心情 Post By:2006/12/7 22:40:00 [显示全部帖子]

个人认为,初学者也不必刻意去学Eval难懂的写法,就40楼的例子,用简单的FindText公式叠加虽然公式很长且效率不高,但简单易学易懂,日后修改公式也简单,各位易友除非在函数上掌握的比较熟练,否则生吞活剥Eval只会消化不良的.另外太深奥的公式,也有违易表的易字的...

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


加好友 发短信
等级:超级版主 帖子:2320 积分:350 威望:0 精华:0 注册:2006/8/11 10:55:00
  发帖心情 Post By:2006/12/8 20:34:00 [显示全部帖子]

下面引用由30980132006/12/08 08:33pm 发表的内容:
我下载了这个小程序,一运行就死机啦,是怎么回事啊?

看58楼

 回到顶部