VBA在行中搜索两个值并返回不同的列值

时间:2018-07-27 10:20:22

标签: vba search double

我有一个包含以下数据的excel工作表:

enter image description here

在VBA中,如何搜索和匹配A和B列中的两个值,以及如何返回C列中的行值。 例: 我需要搜索c + c1的完全匹配项,结果为yy

非常感谢您的帮助

2 个答案:

答案 0 :(得分:0)

像这样循环遍历行时使用If语句:

If ws.cells(i,1).Value = c And ws.cells(i,2).value = c1 Then

result = yy
End If

希望有帮助!

答案 1 :(得分:0)

U可以创建第4列,此列将是您在VBA中使用的关键列。在此列中,您将连接A和B值,然后创建一个代码,该代码搜索concat并返回右侧的第4个单元格。

table

Sub Example()

Dim keyRange As Range
Set keyRange = Planilha1.Range("A2:A8")

Dim SearchValue1, SearchValue2 As String

SearchValue1 = "a"
SearchValue2 = "a2"

Dim lin As Integer
lin = Application.WorksheetFunction.Match(SearchValue1 & SearchValue2, keyRange, 0)

Dim answer As String
answer = Planilha1.Range("A2:D8").Cells(lin, 4)

Debug.Print answer


End Sub