| 以文本方式查看主题 - 易表在线答疑 (http://egrid2000.com/dvbbs/index.asp) -- 用户社区 (http://egrid2000.com/dvbbs/list.asp?boardid=2) ---- 求助写按钮公式 (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=2842) |
| -- 作者：楚风 -- 发布时间：2011/2/11 20:36:00 -- 求助写按钮公式 egd文件下载 我是易表爱好者，喜欢学习，因此也就经常遇到一些难题，现求助写一个自定义按钮公式，要求如下，这里先谢过了 1、要求用按钮查找第三列的空值，并把光标定位到查找到的单元格。 2、要求显示提示信息“第三列有空值” |
| -- 作者：lyang70 -- 发布时间：2011/2/12 8:34:00 -- egd文件下载 |
| -- 作者：楚风 -- 发布时间：2011/2/12 10:42:00 -- lyang70 老师：太谢谢您啦！每次问题到您这里都能迎刃而解，在您的指导下，我举一反三的把此公式用到字符型的列，就不行了，我看了帮助里面,套用Findtext也不行，您再帮看一下，这里先谢了。 |
| -- 作者：lyang70 -- 发布时间：2011/2/12 12:55:00 -- 字符型列应该没问题吧？ |
| -- 作者：楚风 -- 发布时间：2011/2/12 23:59:00 -- [这个贴子最后由楚风在 2011/02/13 00:13am 第 1 次编辑] 谢谢，不知为何，你一说行，我再测试，却又行了，有点怪。 |
| -- 作者：程兴刚 -- 发布时间：2011/2/13 23:50:00 -- 这样行吗？ If(FindRow(GridName,"第三列", "=" ,"") > 0,If(MsgBox("第三列存在空值,是否查看？",2,4) = True ,FilterFor("第三列", "=" ,"") And eval("Move("+text(FindRow(GridName,"第三列", "=" ,""))+",3,"+text(FindRow(GridName,"第三列", "=" ,""))+",3)"), True ),MsgBox("检查完毕,第三列不存在空值!",1,4)) |
| -- 作者：wjq1072 -- 发布时间：2011/2/14 13:11:00 -- If(FindRow(GridName,"第三列","=","") < 1,MsgBox("第三列没有空格",0),LocateFor("第三列","=","") And Move(Row,"第三列") And MsgBox("第三列、第"+Text(Row)+"行有空格",0)) |
| -- 作者：楚风 -- 发布时间：2011/2/15 1:49:00 -- 太谢谢三位老师啦，身为用户的我有幸得到您们的悉心赐教，已使我深深地爱上了易表，也使我更觉学海无止境，，谢谢了， 易表的光大有了您们一份辛劳耕耘汗水，您们是易表用户的福音。 以上三位老师的指导我皆认真地去看去学去体会了，很有趣，方法很多，使我受益很多，但这里wjq1072 老师的方法正是我的所需要的，并同其余老师，一并特此谢意！ |