如何查找数据库中的重复数据？

实现方式如下：

  Dim cnn As Object, rs As Object, SQL$, i&, s$

    Set cnn = CreateObject("ADODB.Connection")

    cnn.Open "Provider=Microsoft.Jet.Oledb.4.0data Source=" & ThisWorkbook.Path & "\排课数据.mdb"

    SQL = "Select 星期&节&班级,count(星期&节&班级) from 排课 where 星期 is not null group by 星期&节&班级 having count(星期&节&班级)>1"

    Set rs = CreateObject("ADODB.Recordset")

    rs.Open SQL, cnn, 1, 3

    If rs.RecordCount Then

        For i = 1 To rs.RecordCount

            s = s & vbCrLf & "星期" & rs.Fields(0) & "班，重复次数：" & rs.Fields(1)

            rs.MoveNext

        Next

        MsgBox "有" & rs.RecordCount & "条记录重复：" & s

    Else

        MsgBox "没有发现重复记录"

    End If

    rs.Close

    cnn.Close

    Set rs = Nothing

    Set cnn = Nothing

End Sub

1。删除全部重复记录（慎用） 

Delete表Where重复字段In(Select重复字段From表GroupBy重复字段HavingCount(*)>1)

2。保留一条（这个应该是大多数人所需要的^_^）

DeleteHZTWhereIDNotIn(SelectMax(ID)FromHZTGroupByTitle)

注：此处保留ID最大一条记录

3、查找表中多余的重复记录（多个字段） 

select*fromvitaea

where(a.peopleId,a.seq)in(selectpeopleId,seqfromvitaegroupbypeopleId,seqhavingcount(*)>1)

4、删除表中多余的重复记录（多个字段），只留有rowid最小的记录

deletefromvitaea

where(a.peopleId,a.seq)in(selectpeopleId,seqfromvitaegroupbypeopleId,seqhavingcount(*)>1)

androwidnotin(selectmin(rowid)fromvitaegroupbypeopleId,seqhavingcount(*)>1)

excel找重复的数据？在我们汇总Excel中的数据时，时不时会存在一些重复的数据，那么我们应该怎样寻找到这些重复的数据并标记出来呢？

1首先打开具有重复数据的文件，将具有重复的数据列选中，这里的“订单编号”列重复，所以选中了“订单编号”列。

2单击“开始”选项卡中的“样式”组中的“条件格式”下拉按钮，选择“突出显示单元格规则|重复值”命令。

3在打开的“重复值”对话框中，就可以对重复值做标记，用来区分了。

4这里将重复值的文字颜色更改为紫色，可以单击“设置为”下拉按钮，选择“自定义格式”，打开“设置单元格格式”对话框，在这里可以将重复值的标记进行自定义的修改。

5点击确定后，我们可以看到重复值已经做出了紫色文字标记。

6那么为了更加明显的区分，我们将重复的行置顶，点击“开始”选项卡下的“排序和筛选”按钮，选择“自定义排序”。

7在打开的对话框中，更改“主要关键字”，设置为具有重复数值的列，这里是“订单编号”，排序依据选择你将重复值标记的依据，这里是“字体颜色”，次序为“紫色”。为了让它更加醒目，我选择“在顶端”将它排列在了顶端，这个可以根据需要自行选择。

8这样，我们就可以看到重复的数据被筛选出来了，并且很醒目的排列在顶端。

1、第一步，打开数据库，并创建一个包含重复数据的新用户表，见下图，转到下面的步骤。

　  

2、第二步，执行完上面的 *** 作之后，输入如下红框中的SQL语句，然后单击运行按钮，以查看数据库中用户表中的重复数据，见下图，转到下面的步骤。  

　  

3、第三步，执行完上面的 *** 作之后，查找出了具有重复名称的数据，见下图，转到下面的步骤。  

　  

4、第四步，执行完上面的 *** 作之后，可以使用如下语句来去除重复数据，见下图，转到下面的步骤。

　  

5、第五步，执行完上面的 *** 作之后，最终删除了同一类中的重复数据，见下图。这样，就解决了这个问题了。  

　  

　  

---