已经有n个公司合作的品牌，如何在40个品牌中筛选未合作的

孤晨

Sub lll()
  Dim i, k, m, n, h, g As Integer
  Dim arr1, arr2
  
  i = Cells(Rows.Count, 2).End(xlUp).Row
  k = Cells(Rows.Count, 3).End(xlUp).Row
  
  arr1 = Range("b2:b" & i)
  arr2 = Range("c2:c" & k)
  
  For m = 1 To UBound(arr2)
  h = 0
  For n = 1 To UBound(arr1)
    If arr2(m, 1) = arr1(n, 1) Then
      h = h + 1
    End If
  Next
  If h = 0 Then
    g = g + 1
    Cells(g + 1, 4) = arr2(m, 1)
  End If
  Next
End Sub

谢你灰

=IFERROR(INDEX($C$2:$C$42,SMALL(IF(COUNTIF($B$2:$B$104,$C$2:$C$42)=0,ROW($1:$41),),ROW(A1))),"")三键结束下拉

刘忠孝

数组公式：=INDEX(C:C,SMALL((COUNTIF(B:B,C$2:C42)>0)/1%%+ROW($2:42),ROW(A1)))&""

邹立华

可以把表格发我看看不 我这边用不了 这公式

关注正能量

11111111111111111
未合作的品牌.rar (14.54 KB, 下载次数: 52)

2021-12-13 14:31 上传

点击文件名下载附件
未合作的品牌.rar

苦糖

是要筛选出 对应公司哪些品牌没有合作的品牌显示出来

夏长

=INDEX(C:C,SMALL(IF(COUNTIF(B$2:B$104,C$2:C$42),999,ROW($2:$42)),ROW(A1)))&""

花事了

附件已上传
求以下几个公司未合作的品牌.rar (20.34 KB, 下载次数: 147)

2021-12-13 14:31 上传

点击文件名下载附件
求以下几个公司未合作的品牌.rar

旧巷里的猫语

这算的是一个公司的吧那其他几个公司呢，我这边有几百个公司或者用透视表呢

靠幻觉活着

=IFERROR(INDEX($C$2:$C$42,SMALL(IF(COUNTIF($B$2:$B$104,$C$2:$C$42)=0,ROW($1:$41),),ROW(A1))),"")三键结束下拉