excel - 将匹配值列表放入单个单元格中

Question

我有一个小的 Excel 工作表，例如:

        A               B               C
1                       Best Choices->  Aspen, Oak, Maple
2
3       Wood Type       Score
4       Aspen           8.5  
5       Oak             8.6  
6       Elm             7.1
7       Hickory         7.5  
8       Maple           8.2

我需要检查 B 列中的值，如果分数等于或大于 8(例如)，则将 A 列中的匹配值列出到 C1 中的单个单元格中，如图所示。我尝试了许多索引、匹配、Vlookup 示例，但未能成功。

我认为公式会非常简单，但我没有任何运气。

Answer 1

首先在标准模块中输入以下UDF:

Public Function ListUm(rng As Range, crit As Double) As String
    Dim rw As Long, L As Long
    rw = rng.Rows.Count
    For L = 1 To rw
        If rng(L, 2) >= crit Then
            ListUm = ListUm & ", " & rng(L, 1)
        End If
    Next
    ListUm = Mid(ListUm, 3)
End Function

然后在C1中输入:

=ListUm(A4:B8,8)