怎样在excel中同一列中查找相同内容的单元格,

发布网友 发布时间：2022-04-24 05:26

我来回答

共5个回答

热心网友 时间：2023-10-31 17:09

共有两种方法

以WPS 2019版为例

第一种方法：点击“数据”--->“高亮重复项”，选择要查找的数据，重复的数据就全部高亮显示出来了

第二种方法：“开始”--->“条件格式”--->“突出显示单元格规则”--->“重复值”，将重复单元格标色后再打开数据--筛选，按颜色筛选。不带颜色是唯一值，带颜色的是重复值。

热心网友 时间：2023-10-31 17:09

这个问题其实是excel中很常见的一个问题：对重复值操作。

excel中处理重复数据的方法比较多，常见的有以下几种：

条件格式：选中源数据区域-->开始-->条件格式-->新建规则-->对于唯一值或重复值设置格式-->格式-->选择一种填充色-->确定，操作完成后，源数据区域所有的重复数据便被标记上了颜色。此方法的优点是源数据区域可以是一个跨行列的数组区域。

“删除重复项”功能：数据-->删除重复项-->以当前选定区域排序-->确定。此方法可以方便快捷的保留非重复数据，但是仅限于单列操作。

公式法：辅助列输入公式=countif(A1:A10,A1:A10)下拉，然后筛选公式值为1的列。

VBA法：输入如下代码：

Sub tst()
Dim cel1 As Range
Dim cel2 As Range
For Each cel1 In UsedRange
 For Each cel2 In UsedRange
  If cel1 = cel2 And cel1.Row > cel2.Row Then cel2.Interior.ColorIndex = 20
 Next
Next
End Sub

热心网友 时间：2023-10-31 17:10

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

热心网友 时间：2023-10-31 17:10

可以用：比如A栏是人名，可以B栏中输入公式B2=VLOOKUP(A2,A$1:A2,1,FALSE),当前面出现重复的名字时就会显示名字，而当没有重复时就会显示#N/A,

热心网友 时间：2023-10-31 17:11

=countif(a:a,a1) 下拉
数值大于等于2的就是重复的了

如果你要选择不重复的
数据-高级筛选-勾选 选择不重复记录 选项

2007+版本可以直接数据-删除重复项

热心网友 时间：2023-10-31 17:09

共有两种方法

以WPS 2019版为例

第一种方法：点击“数据”--->“高亮重复项”，选择要查找的数据，重复的数据就全部高亮显示出来了

第二种方法：“开始”--->“条件格式”--->“突出显示单元格规则”--->“重复值”，将重复单元格标色后再打开数据--筛选，按颜色筛选。不带颜色是唯一值，带颜色的是重复值。

热心网友 时间：2023-10-31 17:09

这个问题其实是excel中很常见的一个问题：对重复值操作。

excel中处理重复数据的方法比较多，常见的有以下几种：

条件格式：选中源数据区域-->开始-->条件格式-->新建规则-->对于唯一值或重复值设置格式-->格式-->选择一种填充色-->确定，操作完成后，源数据区域所有的重复数据便被标记上了颜色。此方法的优点是源数据区域可以是一个跨行列的数组区域。

“删除重复项”功能：数据-->删除重复项-->以当前选定区域排序-->确定。此方法可以方便快捷的保留非重复数据，但是仅限于单列操作。

公式法：辅助列输入公式=countif(A1:A10,A1:A10)下拉，然后筛选公式值为1的列。

VBA法：输入如下代码：

Sub tst()
Dim cel1 As Range
Dim cel2 As Range
For Each cel1 In UsedRange
 For Each cel2 In UsedRange
  If cel1 = cel2 And cel1.Row > cel2.Row Then cel2.Interior.ColorIndex = 20
 Next
Next
End Sub

热心网友 时间：2023-10-31 17:10

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

热心网友 时间：2023-10-31 17:09

共有两种方法

以WPS 2019版为例

第一种方法：点击“数据”--->“高亮重复项”，选择要查找的数据，重复的数据就全部高亮显示出来了

第二种方法：“开始”--->“条件格式”--->“突出显示单元格规则”--->“重复值”，将重复单元格标色后再打开数据--筛选，按颜色筛选。不带颜色是唯一值，带颜色的是重复值。

热心网友 时间：2023-10-31 17:10

可以用：比如A栏是人名，可以B栏中输入公式B2=VLOOKUP(A2,A$1:A2,1,FALSE),当前面出现重复的名字时就会显示名字，而当没有重复时就会显示#N/A,

热心网友 时间：2023-10-31 17:09

这个问题其实是excel中很常见的一个问题：对重复值操作。

excel中处理重复数据的方法比较多，常见的有以下几种：

条件格式：选中源数据区域-->开始-->条件格式-->新建规则-->对于唯一值或重复值设置格式-->格式-->选择一种填充色-->确定，操作完成后，源数据区域所有的重复数据便被标记上了颜色。此方法的优点是源数据区域可以是一个跨行列的数组区域。

“删除重复项”功能：数据-->删除重复项-->以当前选定区域排序-->确定。此方法可以方便快捷的保留非重复数据，但是仅限于单列操作。

公式法：辅助列输入公式=countif(A1:A10,A1:A10)下拉，然后筛选公式值为1的列。

VBA法：输入如下代码：

Sub tst()
Dim cel1 As Range
Dim cel2 As Range
For Each cel1 In UsedRange
 For Each cel2 In UsedRange
  If cel1 = cel2 And cel1.Row > cel2.Row Then cel2.Interior.ColorIndex = 20
 Next
Next
End Sub

热心网友 时间：2023-10-31 17:11

=countif(a:a,a1) 下拉
数值大于等于2的就是重复的了

如果你要选择不重复的
数据-高级筛选-勾选 选择不重复记录 选项

2007+版本可以直接数据-删除重复项

热心网友 时间：2023-10-31 17:10

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

热心网友 时间：2023-10-31 17:10

可以用：比如A栏是人名，可以B栏中输入公式B2=VLOOKUP(A2,A$1:A2,1,FALSE),当前面出现重复的名字时就会显示名字，而当没有重复时就会显示#N/A,

热心网友 时间：2023-10-31 17:11

=countif(a:a,a1) 下拉
数值大于等于2的就是重复的了

如果你要选择不重复的
数据-高级筛选-勾选 选择不重复记录 选项

2007+版本可以直接数据-删除重复项

热心网友 时间：2023-10-31 17:09

共有两种方法

以WPS 2019版为例

第一种方法：点击“数据”--->“高亮重复项”，选择要查找的数据，重复的数据就全部高亮显示出来了

第二种方法：“开始”--->“条件格式”--->“突出显示单元格规则”--->“重复值”，将重复单元格标色后再打开数据--筛选，按颜色筛选。不带颜色是唯一值，带颜色的是重复值。

热心网友 时间：2023-10-31 17:09

这个问题其实是excel中很常见的一个问题：对重复值操作。

excel中处理重复数据的方法比较多，常见的有以下几种：

条件格式：选中源数据区域-->开始-->条件格式-->新建规则-->对于唯一值或重复值设置格式-->格式-->选择一种填充色-->确定，操作完成后，源数据区域所有的重复数据便被标记上了颜色。此方法的优点是源数据区域可以是一个跨行列的数组区域。

“删除重复项”功能：数据-->删除重复项-->以当前选定区域排序-->确定。此方法可以方便快捷的保留非重复数据，但是仅限于单列操作。

公式法：辅助列输入公式=countif(A1:A10,A1:A10)下拉，然后筛选公式值为1的列。

VBA法：输入如下代码：

Sub tst()
Dim cel1 As Range
Dim cel2 As Range
For Each cel1 In UsedRange
 For Each cel2 In UsedRange
  If cel1 = cel2 And cel1.Row > cel2.Row Then cel2.Interior.ColorIndex = 20
 Next
Next
End Sub

热心网友 时间：2023-10-31 17:10

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

热心网友 时间：2023-10-31 17:10

可以用：比如A栏是人名，可以B栏中输入公式B2=VLOOKUP(A2,A$1:A2,1,FALSE),当前面出现重复的名字时就会显示名字，而当没有重复时就会显示#N/A,

热心网友 时间：2023-10-31 17:11

=countif(a:a,a1) 下拉
数值大于等于2的就是重复的了

如果你要选择不重复的
数据-高级筛选-勾选 选择不重复记录 选项

2007+版本可以直接数据-删除重复项