Office: untereinander stehehende zellen in eine zelle zusammenfassen

Hallo,
ich hoffe mir kann jemand helfen.
Ich habe eine Tabelle mit Artikelnummern und Größenangaben.
Beispiel:
Artikel Größe
010101 9
010101 10
010101 11
020202 5
020202 6
020202 7

Jetzt möchte ich aber das die Größen in einer Zelle zusammengefasst werden:
010101 9,10,11
020202 5,6,7

Gibt es dazu eine Formel? Habe leider nichts gefunden.
Vielen Dank im Voraus :-D

 

Hallo!

Mit Formeln dürfte das äußerst mühselig werden, denn mit Verkettungen hat es Excel nicht so...
Aber mit einer benutzerdefinierten Funktion ist das relativ schnell machbar:

	A	B	C	D	E
1	Artikel	Größe		10101	9,10,11
2	10101	9		20202	5,6,7
3	10101	10
4	10101	11
5	20202	5
6	20202	6
7	20202	7

Zelle	Formel
E1	=kettewenn(A$2:A$7;D1;B$2:B$7;",")
E2	=kettewenn(A$2:A$7;D2;B$2:B$7;",")

Der Code für diese Funktion gehört in ein allgemeines Modul:

Code:

Function KetteWenn(KritBereich As Range, Krit, KetteBereich As Range, Trenner As String) As String
    Dim Zelle As Range, i As Long
    For Each Zelle In KritBereich
        i = i + 1
        If Zelle = Krit Then KetteWenn = KetteWenn & KetteBereich(i) & Trenner
    Next Zelle
    KetteWenn = Left(KetteWenn, Len(KetteWenn) - Len(Trenner))
End Function

 

Hallo Schatzi!
Entschuldige erst mal das ich in fremden Anfragen meine eigene Anfrage stelle,aber ich denke das das zusammen gehören könnte.
Mein Problem ist das Gleiche wie das zuvor beschriebene mit einem Unterschied:
Meine Suchkreterien sind über mehrere Tabellenblätter (ca.60 Blätter) verteilt.
Als Beispiel:

Tabellenblatt 1:

A 1
B 2
C 3

Tabellenblatt 2:

A 4
B 5
C 6

Die Zusammenfassung sollte dann so aussehen:

A 1 4
B 2 5
C 3 6

Wenn möglich in der Zusammenfassung die Zahlen in einer Zelle untereinander.
Bis jetzt habe ich keine Ahnung wie ich das Zusammen bekomme. Kannst du (oder jemand anderes) dabei helfen?