excel vba判断单元格内容是否有重复

答案:3 悬赏:0

解决时间 2021-04-27 21:53

提问者网友：晨熙污妖王
2021-04-27 12:54

1。判断单元格内容是否有重复（给重复内容填充红色） 2。J4：Q11 3.同列提取单元格内重复的内容到第3单元（第三单元前加“A”字符）也就是说第三单元=A+填充红色的字符要用VBA

最佳答案

二级知识专家网友：青灯壁纸妹
2021-04-27 14:09

1、是查找单列重复还是整个区域重复
2、提取内容时重复的算一个还是有几个提几个，比如J4J5都是x，J3是Ax还是Axx

全部回答

1楼网友：统治我的世界
2021-04-27 14:48

直接用快速分析不可以吗

2楼网友：木子香沫兮
2021-04-27 14:22

VBA代码 Sub Sheet3_按钮1_Click() Dim i As Integer Dim j As Integer Dim Num As Integer For i = 10 To 17 Cells(3, i) = "" Cells(3, i).Font.ColorIndex = 3 Next i For i = 4 To 11 For j = 10 To 17 Num = Evaluate("COUNTIF(J4:Q11," & Cells(i, j) & ")") If Num > 1 Then Cells(i, j).Interior.ColorIndex = 3 If Cells(3, j) = "" Then Cells(3, j) = "A+" & Cells(i, j) Else Cells(3, j) = Cells(3, j) & " " & Cells(i, j) End If End If Next j Next i End Sub

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息！