使用Excel VBA进行多次查找

Question

我在Excel 2013中有两个不同表格中的两个表格 - 都从单元格A1开始：

工作表

A1:A3 | B1:B3    
a001  | ?    
a002  | ?    
b001  | ?

表B表

A1:A5 | B1:B5    
b001  | 75    
a002  | 85    
b001  | 60    
b002  | 25    
b001  | 50

我想在Sheet A表范围A1：A5中对Sheet A表范围A1：A3中的每个单元格值进行简单查找。如果匹配，我希望将表B范围B1：B5中的相应值复制到表A表B1：B3。如果有多个匹配，则应以分号分隔复制和显示所有匹配。结果应如下所示：

表格（已更新）

A1:A3 | B1:B3    
a001  |    
a002  | 85    
b001  | 75;60;50

我已经开始使用此代码，但无法进一步：

Sub DeleteRow()
For Each c In Range("A1:A5")
    If c = ??? Then ???
Next
End Sub

我希望有人可以提供帮助。