寻找失踪字，并显示它

Question

我需要知道的一些编程代码来解决以下条件：

1. 我曾在Sheet1十几个名字，并在Sheet2中九个名字。
2. 如何编写代码以搜索与Sheet1相比Sheet2中缺少哪个名称，并在与Sheet1比较后在Sheet2中显示丢失的名称？

我想：

Dim i, j As Integer 
Dim EID(1 To 5) As Integer 
For i = 1 To 5 
EID(i) = Range("A" & i).Value 
Next i 

For i = 1 To 5 
If Not ActiveSheet.Cells.Find(EID(i)) Is Nothing Then 
MsgBox "Missing Number is" & EID(i) 
Next i 

Answer 1

如果两份名单被标记和分类在ColumnA，然后在Sheet2中的B2向下复制到西装：

=IF(ISNUMBER(MATCH(Sheet1!A$2:A$11,A$2:A$10,0)),"",INDEX(Sheet1!A$2:A$11,MATCH(A2,Sheet1!A$2:A$11,0)-1))