Новости:

Из правил форума: Тема должна отражать суть вопроса, топики типа "help please" будут удаляться!

Главное меню

Поиск и подстановка по условию

Автор Shadowmaker, 10.04.2012, 11:05

« назад - далее »

Shadowmaker

Никак не могу разобраться...
Необходимо в диапазоне данных найти определённое значение (цифру в ряду цифр) и подставить значение (слово) находящееся в другой ячейке.
Всё хорошо пока искомая цифра только 1-на, но их может быть несколько, тогда нужно чтобы слова были перечислены через запятую... как это сделать?

Во вложении файл куда предполагается воткнуть формулу... сама формула должна быть в D13, диапазон поиска D11:AP11, подставляемые слова в диапазоне D4:AP4

nilem

УДФ
Function ert$(s1#, rng1 As Range, rng2 As Range)
Dim i&, s$
' rng2 - подставляемые слова
If rng1.Count <> rng1.Count Then Exit Function
For i = 1 To rng1.Count
    If rng1(1, i) = s1 Then s = s & ", " & rng2(1, i)
Next
ert = Mid(s, 3)
End Function

На листе для Д13: =ert(B13;$D$11:$AP$11;$D$4:$AP$4)