[엑셀Q&A,VBA] 같은 조건의 문자열 찾아 합치기 3

[엑셀Q&A,VBA] 같은 조건의 문자열 찾아 합치기 1 

[엑셀Q&A,VBA] 같은 조건의 문자열 찾아 합치기 2 

같은 내용입니다만, 댓글로 좀 더 좋은 수식을 알려주신 분이 있습니다. 네이버 지식인에서 활약하시는 "큰형님"이라는 닉을 쓰시는 분이 만드신 사용자함수입니다. 

써보니 확실히 좋습니다. 혼자 머리 싸매고 고민하느니 잘 하는 사람한테 물어보는게 최고 좋다는! 

Function ConcatText(범위1, 조건, 범위2) As String
Dim strTemp() As String
Dim rng As Range
Dim i As Integer, n As Integer
n = 범위2.Column - 범위1.Column
For Each rng In 범위1
If rng = 조건 Then
ReDim Preserve strTemp(i)
strTemp(i) = rng.Offset(, n)
i = i + 1
End If
Next rng
ConcatText = Join(strTemp, "/")
End Function

힘수 사용법

=ConcatText(범위1,조건,범위2) 

범위1에서 

조건과 같은 값이 있는 행의

범위2의 텍스트를 모두 "/" 표시로 구분하여 합친다