用于匹配ID的查找功能,然后填充其他值 - Vlookup

时间:2018-02-27 18:41:45

标签: excel vba vlookup

我有一个数据集:

ID Name Amount BID        BID 2
1  Jack 100     1          
1  John 200     *Blank*    
2  Tony 300     2          

如何查找ID以及ID匹配的位置,查看BID并找到已为相同ID填充ID值的相关ID值。我希望该值显示在第5列的BID 2中。

IE John的BID应为1,因为他的ID是1,就像Jacks ID一样。

我试过了

 =vlookup(A2,A2:C5,3,FALSE)

1 个答案:

答案 0 :(得分:0)

老实说,我不知道通过公式做到这一点的方法,但VBA解决方案看起来像这样:

Sub FindTheValue()

Dim sht As Worksheet, lastrow As Long, i As Long, j As Long

Set sht = ThisWorkbook.Worksheets("Sheet1")
lastrow = sht.Cells(sht.Rows.Count, "C").End(xlUp).Row

For i = 1 To lastrow
    If Range("Z" & i).Value = "" Then
        For j = 1 To lastrow
            If Range("C" & i).Value = Range("C" & j).Value And Range("Z" & j).Value <> "" Then
                Range("AA" & i).Value = Range("Z" & j).Value
                Exit For
            End If
        Next j
    End If
Next i

End Sub

BeforeAfter