Return multiple values to single cell from array

Originally Posted by olliecottam

My thoughts are that the Lookup Range could be an array as per the following, but the code needs to be amended to make it work:

IF($C$2:$C$1001=$G$6,$R$2:$R$1001,"")

Une in cell like

=MyLookUp(C2:C17,G6,R2:R17,CHAR(10))

Function MyLookUp(lookupval As Range, lookuprange As Range, myCol As Range, JoinStr)
    MyLookUp = Join(Filter(Evaluate("transpose(if(" & lookupval.Address & "=" & _
            lookuprange.Address & "," & myCol.Address & "))"), False, 0), JoinStr)
End Function