这样的结果该如何实现？？？？？？？？？？？？？？？

stvent

表A
a  b  c  d
1  2  3  4
1  2  2  4
1  2  4  4
1  2  5  4
2  1  2  5
2  1  3  5
2  1  4  5
2  1  5  5
如何操作将D列中重复的值删除，只保留第一条记录，而不影响a,b,c三列，
a  b  c  d
1  2  3  4
1  2  2  
1  2  4  
1  2  5  
2  1  2  5
2  1  3  
2  1  4  
2  1  5  

竹笛

循环 加 判断

chaosheng

用查询就可完成

查询1:
SELECT First(表A.a) AS a, First(表A.b) AS b, First(表A.c) AS c, 表A.d
FROM 表A
GROUP BY 表A.d;


查询2:
SELECT 表A.a, 表A.b, 表A.c, 查询1.d
FROM 表A LEFT JOIN 查询1 ON (表A.c = 查询1.c) AND (表A.b = 查询1.b) AND (表A.a = 查询1.a);

Henry D. Sy

1. Dim rs As New ADODB.Recordset
   
2.     Dim str
   
3.     rs.Open "A", CurrentProject.Connection, adOpenKeyset, adLockOptimistic
   
4.     rs.MoveFirst
   
5.     str = rs.Fields("d")
   
6.     rs.MoveNext
   
7.     Do While Not rs.EOF
   
8.         If str <> rs.Fields("d") Then
   
9.             str = rs.Fields("d")
   
10.         Else
    
11.             rs.Fields("d") = Null
    
12.         End If
    
13.         rs.MoveNext
    
14.     Loop
    
15.     rs.UpdateBatch
    
16.     rs.Close
    
17.     Set rs = Nothing

复制代码

stvent

Henry D. Sy 发表于 2013-4-25 13:20
就是ado记录集

能给个示例吗？

Henry D. Sy

stvent 发表于 2013-4-25 13:15
这么简短~~~

就是ado记录集

stvent

Henry D. Sy 发表于 2013-4-25 13:02
try
ado

{:soso_e132:}这么简短~~~

Henry D. Sy

try
ado

stvent

ly 发表于 2013-4-25 11:46
这个好像用在E上，楼主的好像是A？

那么有什么方法呢？

ly

mclly2000 发表于 2013-4-25 10:09
给你提供一个公式：
=IF(COUNTIF(A:A,A1)>1,"重复","")

这个好像用在E上，楼主的好像是A？