2014-03-06 42 views

回答

0

那麼你可以使用這個「大」數組公式:

=INDEX($A$1:$A$10;SMALL(IF(NOT(COUNTIF($B$1:$B$2;$A$1:$A$10)+COUNTIF($C$1:$C$3;$A$1:$A$10)+COUNTIF($D$1:$D$2;$A$1:$A$10));ROW($A$1:$A$10)-ROW($A$1)+1;"");ROW(A1))) 

,無論你想獲得第一的,然後複製下來,從而得到別人寫公式。

這是一個數組公式,所以不要忘記按Ctrl Shift鍵輸入

根據您的區域設置,你可能需要更換字段分隔符「;」通過 「」

這一個是小,仍然有效:

=INDEX($A$1:$A$10;SMALL(IF(NOT(COUNTIF($B$1:$D$3;$A$1:$A$10));ROW($A$1:$A$10)-ROW($A$1)+1;"");ROW(A1))) 
1

試試這個:

Sub MissingItems() 
    Dim N As Long, I As Long, J As Long, V As String 
    Dim r As Range 
    N = Cells(Rows.Count, 1).End(xlUp).Row 
    J = 1 
    For I = 1 To N 
     V = Cells(I, 1).Value 
     Set r = Nothing 
     Set r = Range("B:D").Find(V, After:=Range("B1")) 
     If r Is Nothing Then 
      Cells(J, 5).Value = V 
      J = J + 1 
     End If 
    Next I 
End Sub 
相關問題