excel vba编程怎样查找某一单元格内容在整张表上是否有重复

如题所述

Sub 查找重复()
Set rg1 = Range("F8")  '要查找的单元格
Set rg2 = Cells.Find(rg1.Value, rg1)
If rg2.Address = rg1.Address Then
    MsgBox "没有重复"
Else
    MsgBox "有重复"
End If
End Sub

温馨提示:答案为网友推荐,仅供参考
相似回答