doppelte Datensätze + Konsolidieren

[envie1804]

Hallo liebe Forum Mitglieder,
ich würde hierzu bitte wieder eure Hilfe benötigen! 

  Muster Beispiel: im Anhang
Bei meiner original Liste könnte ich natürlich die Duplikate  (Namen) entfernen allerdings haben diese des Öfteren 1-5 unterschiedliche Stützpunkte.

Ergebnis: Es sollte nur eine Zeile mit Name + alle Stützpunkte konsolidiert (mittels "," ) übrig bleiben.


Ich danke euch jetzt schon vielmals für eure Hilfe!
Liebe Grüße
Sandra

[RPP63]

Moin!
Besorge Dir eine aktuelle Excel-Version oder nutze das kostenlose Excel-Online.

Gruß Ralf

[slowboarder]

Hi
in Excel 2016 beispielsweise so

1. Liste nach Namen sortieren, so das alle "Max Mustermann" direkt untereinander stehen
2. in Tag-Zusammenfassung dann diese Formel in C3 bis Datenende eintragen:
=B3&WENN(A3=A4;","&C4;"")
3. dann die Spalte C kopieren und an gleicher Stelle als Wert einfügen
4. jetzt das DUPLIKATE ENTFERNEN ausführen.

Gruß Daniel

[cysu11]

Hallo Sandra,

oder per VBA, siehe Anhang, ein Klick. ;)

LG, Alexandra

[ws-53]

Auch mit Power Query geht dies sehr einfach.

[snb]

@cysu11

Schau mal bitte: currentregion und usedrange an.
Auch Arrays sind wichtig.

Code:

Sub M_snb()
  sn = Cells(1).CurrentRegion
    
  With CreateObject("scripting.dictionary")
    For j = 2 To UBound(sn)
      .Item(sn(j, 1)) = IIf(.Item(sn(j, 1)) = "", "", .Item(sn(j, 1)) & ", ") & sn(j, 2)
    Next

    Cells(20, 6).Resize(.Count, 2) = Application.Transpose(Array(.keys, .items))
  End With
End Sub

[cysu11]

Hi snb,

das ist natürlich viel eleganter und kürzer, je mehr fälle ich in den Foren sichte, umso mehr versteht ich davon! ;)

DANKE für deine Hinweis! :)

LG, Alexandra

[EA1950]

Hallo,

Besorge Dir eine aktuelle Excel-Version oder nutze das kostenlose Excel-Online.
Gruß Ralf

wie wahr! Mit einem aktuellen Excel365 wäre das Problem ganz einfach:
=GRUPPIERENNACH(A3:A5;B3:B5;MATRIXZUTEXT;0;0)