Eine Familie von Microsoft-Tabellenkalkulationsprogrammen mit Tools zum Analysieren, Darstellen und Vermitteln von Daten.
Hallo Leon,
das lässt sich mit einer Formel nicht realisieren.
Probiere mal folgende UDF:
Function TextKombi(Bereich As Range, Zahlen As Range) As String
Dim varZahlen As Variant
Dim i As Integer
Dim myStr As String
varZahlen = Split(Zahlen, ",")
For i = LBound(varZahlen) To UBound(varZahlen)
myStr = myStr & "; " & Application.Index(Bereich, varZahlen(i))
Next
TextKombi = Mid(myStr, 3)
End Function
und rufe diese dann im Blatt auf mit z.B.:
=TextKombi(B2:B4;D2)
Claus