Поместите список совпадающих значений в одну ячейку

У меня есть небольшой лист 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, как показано на рисунке. Я пробовал множество примеров Index, Match, Vlookup, но не смог сделать эту работу.

Я думаю, что формула была бы довольно простой, но мне не везет.
1 2
excel excel-formula vlookup excel-2010

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 введите:

=Листум (A4: B8,8)

3