找出不同的业务

风吹裙起p凉

我需要找到同一家销货单位里的不同的业务员，这个公式应该怎么写？最好是在D列标出来。比如七里海店 这家店有个业务员嘉某，跟其他的业务员不一样，我想把这种情况的业务都找出来，并在D列标注出来，请教各位大神这个怎么处理？

liujing_hotwind

=IF(1/COUNTIFS($A$2:$A$33,A2,$C$2:$C$33,C2)=1,"另类","")

chxw68

1. Sub test()
   
2.   Dim r%, i%
   
3.   Dim arr, brr
   
4.   Dim d As Object
   
5.   Set d = CreateObject("scripting.dictionary")
   
6.   With Worksheets("sheet4")
   
7.     r = .Cells(.Rows.Count, 1).End(xlUp).Row
   
8.     .Range("c2:c" & r).Interior.ColorIndex = 0
   
9.     arr = .Range("a1:c" & r)
   
10.     For i = 1 To UBound(arr)
    
11.       xm = arr(i, 1) & "+" & arr(i, 2)
    
12.       If Not d.exists(xm) Then
    
13.         d(xm) = i
    
14.       Else
    
15.         m = d(xm)
    
16.         If arr(i, 3) <> arr(m, 3) Then
    
17.           .Cells(i, 3).Interior.ColorIndex = 6
    
18.         End If
    
19.       End If
    
20.     Next
    
21.   End With
    
22. End Sub
    

复制代码

chxw68

详见附件。

Lgxxxx

看看是不是你的要求

风吹裙起p凉

Lgxxxx 发表于 2021-8-28 15:13
看看是不是你的要求

非常符合我的要求。但是请教一下，countif那一段我就没看懂，1除countif那部分又是什么原理？

liujing_hotwind

风吹裙起p凉 发表于 2021-8-30 10:46
非常符合我的要求。但是请教一下，countif那一段我就没看懂，1除countif那部分又是什么原理？

countif计业务员出现几次，出现1次那就是1/1=1，如果出现多次就是1/2或3<1

风吹裙起p凉

liujing_hotwind 发表于 2021-8-30 11:02
countif计业务员出现几次，出现1次那就是1/1=1，如果出现多次就是1/2或3

soga    可是，如果七里海店的嘉某只出现了一次，那不也会出现“不相同”么？

Lgxxxx

风吹裙起p凉 发表于 2021-8-30 10:46
非常符合我的要求。但是请教一下，countif那一段我就没看懂，1除countif那部分又是什么原理？

=COUNTIFS($A$2:$A$33,A3,$C$2:$C$33,C3)

这个是统计A2:A33和C2:C33这二个条件区域内同时只出现一次的数据，不用1除也可以。
公式可以写成

=IF(COUNTIFS($A$2:$A$33,A2,$C$2:$C$33,C2)=1,"不相同","")

Lgxxxx

风吹裙起p凉 发表于 2021-8-30 11:09
soga    可是，如果七里海店的嘉某只出现了一次，那不也会出现“不相同”么？

你的要求不就是找出不同吗？只出现一次就是和其它不相同啊