Объединить, если в диапазоне

Question

У меня проблема с получением текстового результата, который представляет собой конкатенацию / объединение ячеек "X" количества на основе столбца в другой ячейке. Пример:

Cell value = 2

Name  
Txt1         
Txt2         
Txt3          
Txt4          

Result = Txt1Txt2

Cell value = 3

Name  
Txt1         
Txt2         
Txt3          
Txt4          

Result = Txt1Txt2Txt3

Спасибо. :)

Answer 1

Нужно иметь CONCAT():

=CONCAT(A2:INDEX(A2:A5,C1))

---

Если у него нет CONCAT, то это UDF будет mimi c функция. Поместите это в модуль, прикрепленный к книге:

Function CONCAT(rng As Range)
    Dim rngArr As Variant
    rngArr = rng

    On Error GoTo onlyone
    Dim itm As Variant
    For Each itm In rngArr
        CONCAT = CONCAT & itm
    Next itm
    Exit Function
onlyone:
        CONCAT = rngArr
End Function