Excel 表格中快速找到单元格相同的内容

一.介绍

有的时候需要在表格中找到相同的数据，如下图，找出表格中哪里有“小明”：

实现后的效果如下图，一眼就可以看到哪里有相同的数据：

二.实现方法

1.在表格中打开“开发工具”下面的“编辑器”。表格中默认是没有“开发工具”这个的，需要你手动打开让它显示出来，如何显示出来自行百度。

2.在打开的编辑器中双击你的sheet页

3.在右侧的窗口中输入下面代码，保存

  Range("A1:Z60").Interior.ColorIndex = xlNone '清除单元格里面原有的背景颜色
  '当选择的单元格的个数大于1时，重新给target赋值
    If target.Count > 1 Then
       Set target = target.Cells(1)
    End If
    '当选中的单元格不包含指定区域的单元格时，退出这个程序
    If Application.Intersect(target, Range("A1:Z60")) Is Nothing Then
        Exit Sub
    End If
    Dim rng As Range
    '遍历单元格
    For Each rng In Range("B1:D9")
        If rng.Value = target.Value Then
            rng.Interior.ColorIndex = 6
        End If
    Next
    
    
    
End Sub

4.上面代码中的 Range(“A1:Z60”) 和Range(“B1:D9”)根据你的需要自行更改数值
5. 上面代码中的 rng.Interior.ColorIndex = 6；数值6可以更改成下面的数字，不同数字对应不同的颜色

来源：CSDN

作者：葫芦北

链接：https://blog.csdn.net/qidaihuimou/article/details/104062603