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

VBA搜索行中的两个值并返回不同的列值,vba,search,double,Vba,Search,Double,我有一个excel表格,其中包含以下数据: 在VBA中,如何搜索和匹配A列和B列中的两个值,并在C列中返回行值。 例子: 我需要搜索c+c1的精确匹配,并得到结果yy 非常感谢您的帮助当您按如下方式循环行时使用If语句: If ws.cells(i,1).Value = c And ws.cells(i,2).value = c1 Then result = yy End If 希望有帮助 U可以创建第四列,该列将是VBA中要使用的关键列。在本列中,您将连接A和B值,然后我们创建一个代码来

我有一个excel表格,其中包含以下数据:

在VBA中,如何搜索和匹配A列和B列中的两个值,并在C列中返回行值。 例子: 我需要搜索c+c1的精确匹配,并得到结果yy


非常感谢您的帮助

当您按如下方式循环行时使用If语句:

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

result = yy
End If

希望有帮助

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


结果为yy意味着什么?示例中没有显示这两个行的行号。你试过什么?你是想退回x5吗?可能是@QHarr的复制品你是对的。我犯了一个错误。最终结果应该是X5
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