以文本方式查看主题

-  易表在线答疑  (http://egrid2000.com/dvbbs/index.asp)
--  用户社区  (http://egrid2000.com/dvbbs/list.asp?boardid=2)
----  删除第二次重复的行怎么写公式?  (http://egrid2000.com/dvbbs/dispbbs.asp?boardid=2&id=16353)

--  作者:dgmaliyun
--  发布时间:2009/2/23 11:35:00
--  删除第二次重复的行怎么写公式?
我知道DelReptRows可以删除重复的行,但我的表可以重复一次,超过二次(即不能出现第三次)的就删除。有这样的函数吗?
--  作者:tzszw
--  发布时间:2009/2/23 12:58:00
--  
可以变通处理一下:增加一列“重复次数”(数值型),其刷新公式为:Countfor("表名","客户","=","CS01",1,row)
然后在原来使用DelReptRows的地方写上DelFor("表名","重复次数",">=",3),应该就可以达到目的了
--  作者:wjq1072
--  发布时间:2009/2/23 15:04:00
--  
假如你要删除[某列]有重复2次以上的行,你可以设置一按钮公式试试:
AddCol(GridName,"k",3, False ) And EvalFor(GridName,"k","CountFor(GridName,""某列"", ""="" ,[某列],1,Row)=1") And DelReptRows(GridName,"某列","k") And DeleteCol(GridName,"k") And SortCol(GridName,"某列",1) And MsgBox("请你查看是不是只有重复2次啦!!",0)