EXCEL表格 如何在同一列中找出相同的数据

EXCEL表格 如何在同一列中找出相同的数据

excel中假设在A列需要找到相同数值的单元格，在B1输入以下公式
　　=IF(COUNTIF($A$1:A1,A1)>1,"重复","0")。
　　然后往下拖，只要是重复，后面就会显示“重复”两个字，显示0的就是不重复，一目了然。
　　如果要删除重复的行，那么继续做完上面的以后，按下面的步骤：
　　1、选中B列复制，再依次点击编辑、选择性粘贴，选中数值，确定。
　　2、Ctrl+H替换窗口，把重复两个字替换为空（就是“替换为”那里什么也不输入），全部替换。
　　3、依旧选中B列，按F5，在跳出窗口的左下角点击定位条件，选择空值，确定。
　　4、依次点击编辑，删除，选择整行，确定。
　　用vba 删除重复的行。
　　Sub 删除重复行2()。
　　Dim rCell As Range, rRng As Range, dRng As Range
　　On Error Resume Next
　　Application.ScreenUpdating = False
　　Set rRng = Range("A1:A" & Range("A65536").End(xlUp).Row)
　　rRng.AdvancedFilter Action:=xlFilterInPlace, unique:=True
　　For Each rCell In rRng
　　If rCell.EntireRow.Hidden = True Then
　　If dRng Is Nothing Then
　　Set dRng = rCell.EntireRow
　　Else
　　Set dRng = Application.Union(dRng, rCell.EntireRow)
　　End If
　　End If
　　Next
　　If Not dRng Is Nothing Then dRng.Delete
　　ActiveSheet.ShowAllData
　　Application.ScreenUpdating = True
　　End Sub