2015-09-26 60 views
-1

我需要知道的一些編程代碼來解決以下條件:尋找失蹤字,並顯示它

  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 
+1

你嘗試過什麼了嗎?請告訴我們你的代碼。 –

回答

0

如果兩份名單被標記和分類在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)) 
+0

我需要它使用vba – user3047858