如何在 Excel 中查找值並返回多個對應值？

本教程將介紹如何在 Excel 中查找一個值並返回多個對應值，如下方截圖所示：

使用陣列公式查找值並返回多個對應值

使用篩選功能查找值並返回多個對應值

使用自定義函數查找值並返回多個對應值

使用陣列公式查找值並返回多個對應值

這裡有一個較長的陣列公式可以幫助您查找值並返回多個對應值。

1. 在空白單元格中輸入您要查找的值。請參閱截圖：

2. 在相鄰的單元格中，輸入此公式 =IF(ISERROR(INDEX($A$1:$B$7,SMALL(IF($A$1:$A$7=$D$4,ROW($A$1:$A$7)),ROW(1:1)),2)),"",


INDEX($A$1:$B$7,SMALL(IF($A$1:$A$7=$D$4,ROW($A$1:$A$7)),ROW(1:1)),2)) ，然後同時按下 Shift + Ctrl + Enter 鍵，接著拖動 自動填滿手柄 向下填充單元格，直到出現第一個空白單元格為止。請參閱截圖：

注意：在上述公式中，$A$1:$B$7 表示資料區域，$A$1:$A$7 代表您要查找特定值的列範圍，$D$4 表示在步驟 1 中輸入查找值的單元格，2 表示在第二列中尋找對應值。

使用篩選功能查找值並返回多個對應值

在 Excel 中，您也可以使用篩選功能來解決這個問題。

1. 選擇您要查找值的列範圍，然後點擊 資料 > 篩選。請參閱截圖：

2. 接著點擊所選範圍第一個單元格中的箭頭按鈕，並僅在下拉列表中勾選您要查找的值。請參閱截圖：

3. 點擊 確定，現在您會看到只有查找值及其對應值被篩選出來。

使用自定義函數查找值並返回多個對應值

如果您對自定義函數感興趣，也可以使用自定義函數來解決這個問題。

1. 按下 Alt + F11 鍵打開 Microsoft Visual Basic For Applications 視窗。

2. 點擊 模組 > 插入 以插入一個模組視窗，並將以下 VBA 複製到該視窗中。

VBA：查找值並返回多個對應值。

Function MyVlookup(pWorkRng As Range, pRng As Range, pColumnIndex As Integer, Optional pType As String = "v")
'Updateby20140827
Dim xRow As Single
Dim xCol As Single
Dim arr() As Variant
ReDim arr(0)
For i = 1 To pRng.Rows.Count
    If pWorkRng = pRng.Cells(i, 1) Then
        arr(UBound(arr)) = pRng.Cells(i, pColumnIndex)
        ReDim Preserve arr(UBound(arr) + 1)
    End If
Next
If pType = "h" Then
    xCol = Range(Application.Caller.Address).Columns.Count
    For i = UBound(arr) To xCol
        arr(UBound(arr)) = ""
        ReDim Preserve arr(UBound(arr) + 1)
    Next
    ReDim Preserve arr(UBound(arr) - 1)
    MyVlookup = arr
Else
xRow = Range(Application.Caller.Address).Rows.Count
For i = UBound(arr) To xRow
    arr(UBound(arr)) = ""
    ReDim Preserve arr(UBound(arr) + 1)
Next
ReDim Preserve arr(UBound(arr) - 1)
MyVlookup = Application.WorksheetFunction.Transpose(arr)
End If
End Function

3. 關閉視窗，並在單元格中輸入此公式 =MyVlookup(A10,$A$2:$B$7,2)（A10 表示查找值，$A$2:$B$7 表示資料區域，2 表示列索引號）。然後按下 Shift + Ctrl + Enter 鍵。接著拖動填滿手柄向下填充單元格，將游標放在 編輯欄(F) 中，再次按下 Shift + Ctrl + Enter。

提示：如果您想在水平單元格中返回值，可以輸入此公式 =MyVlookup(A10, $A$2:$B$7, 2, "h")。