以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]如果“电话”列中的某条信息有重复值，则在该条信息和重复信息后面“有效性”列中填写“N”，如不重复则填写“Y”。  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=29738)
--  作者：坏坏恋晨
--  发布时间：2013/3/12 16:44:00
--  [求助]如果“电话”列中的某条信息有重复值，则在该条信息和重复信息后面“有效性”列中填写“N”，如不重复则填写“Y”。
如果“电话”列中的某条信息有重复值，则在该条信息和重复信
 
息后面“有效性”列中填写“N”，如不重复则填写“Y”。图片点击可在新窗口打开查看
--  作者：莂妞
--  发布时间：2013/3/12 16:51:00
--  
这个问题我也问过，说是找重复筛选，然后是显示重复值，就行了。亲，你试试吧。
--  作者：狐狸爸爸
--  发布时间：2013/3/12 16:55:00
--  

你的图片看不到，图片你需要上传，别人才能看得见。

 

可以在命令窗口执行：

 

For Each dr As Datarow in DataTables(" 表名").DataRows

    If DataTables("表名").Compute("Count(电话)", "电话 = \'" & dr("电话") & “’” =1 Then

       dr("有效性") = "Y"

    Else

       dr("有效性") = “N”

    End If

Next

 

 

其实不用写代码也行，可以看看：
http://www.foxtable.com/help/topics/1478.htm