Nije mi baš jasno kakve veze ima primer koji si postavila sa sortiranjem. Koliko sam razumeo ti tražiš sva pojavljivanja nekog broja u opsegu i kao rezultat prikazujes sadrzaj prve kolone tabele za sve redove u kojima je nadjen traženi broj. Ovo bi zgodno bilo da se uradi uz pomoć array funkcije ali CONCATENATE ne radi za nizove. Zato sam napravio korisničku funkciju koja to radi
Code:
Public Function FindString(strT As String, rng As Range, rngConc As Range) As String
Dim rw As Long
For rw = 1 To rng.Rows.Count
If InStr(1, rng.Cells(rw, 1).Text, strT) > 0 Then
FindString = FindString & " " & rngConc.Cells(rw, 1).Text
End If
Next rw
End Function
Funkciju pozivaš iz P9 u tvom primeru
Code:
=FindString($O9;C$3:C$22;$A$3:$A$22)
i onda kopiraš dole i desno.
Nije to loše Rembrante, samo što ne bi dodao još malo boje?