So kombinieren Sie Werte aus mehreren Zeilen mit einem Komma als Trennzeichen zu einer einzigen Zeile

Question

Ich habe eine Excel-Datei, die in einer Spalte Produkt-SKUs und in einer anderen Spalte Produktbild-URLs auflistet. Mein Problem ist, dass die Datei mehrere Zeilen für dasselbe Produkt hat ...

... wenn das CMS, das ich in meinem Shop verwende, nur Importe wie diese lesen kann:

Ich würde es manuell machen, aber es gibt Hunderte von Produkten, jedes mit mehreren Bildlinks. Im Grunde brauche ich nur eine SKU001 (SKU002, SKU003 usw.) und muss die entsprechenden Zellen der Spalte B zu einer Zelle zusammenführen, wobei alle Werte durch Kommas getrennt sind. Gibt es eine Möglichkeit, dies zu tun?

Answer 1

Angenommen, wir haben Daten inBlatt1Die SKUs befinden sich in der SpalteAUndBkann beliebige Daten enthalten. Die SKUs sind sortiert:

Das folgende Makro erzeugt neu organisierte Daten inTabelle 2:

Sub ReOrganizer()
   Dim s1 As Worksheet, s2 As Worksheet
   Dim N As Long, i As Long, K As Long
   Dim v1 As String, v2 As String
   Set s1 = Sheets("Sheet1")
   Set s2 = Sheets("Sheet2")
   K = 1
   N = Cells(Rows.Count, "A").End(xlUp).Row
   v1 = s1.Cells(2, 1).Value
   v2 = s1.Cells(2, 2).Value

   For i = 3 To N
      vn1 = s1.Cells(i, 1).Value
      vn2 = s1.Cells(i, 2).Value
      If vn1 = v1 Then
         v2 = v2 & "," & vn2
      Else
         s2.Cells(K, 1) = v1
         s2.Cells(K, 2) = v2
         v1 = vn1
         v2 = vn2
         K = K + 1
      End If
   Next i

   s2.Cells(K, 1) = v1
   s2.Cells(K, 2) = v2

End Sub

Answer 2

Ich glaube, ich habe eine Lösung ohne Makros

Welche Filter

Geben Sie in C2 =IF(A2=A1,C1&","&B2,B2) ein.

Geben Sie dann in D2 =ZÄHLENWENN(C3,B3) ein.

Und füllen Sie bis zur Zeile unterhalb Ihrer Tabelle aus

Die C-Spalte wird mit der Zeichenfolge oben verkettet, wenn es sich um dasselbe Produkt handelt, oder startet eine neue Kette, wenn es sich um ein neues Produkt handelt

Die Spalte D findet das Ende einer Kette (indem sie prüft, ob die Zeile darunter eine neue Kette ist).

Bitte probieren Sie es aus und sagen Sie mir, ob es funktioniert :)