Как преобразовать ячейку (с данными, разделенными запятой) в столбце?

Question

У меня есть такие данные:

 1245   S,M,L
 1356   S,M,L,XL

Какой самый простой способ сделать это:

1245    S
1245    M
1245    L
1356    S
1356    M
1356    L
1356    XL

Answer 1

Это, вероятно, проще всего решить с помощью VBA (imo). Вот действительно простое решение, которое поможет вам начать. Вам, вероятно, придется изменить место, где вы хотите вывести данные.

Sub sizeSplitter()

Dim IDs As Range
    Set IDs = Selection 'Select your range of IDs

Dim rowCounter As Integer
    rowCounter = 2

For Each subRange In IDs

    Dim Sizes() As String

    Sizes = Split(subRange.Offset(0, 1).Value, ",")

    For i = LBound(Sizes) To UBound(Sizes)

        Cells(rowCounter, 4) = subRange.Value
        Cells(rowCounter, 5) = Sizes(i)

        rowCounter = rowCounter + 1

    Next

Next subRange

End Sub

Окончание данных выглядит как это.

Чтобы использовать, выделите идентификаторы, которые вы хотите сделать это. Кроме того, настоятельно рекомендуется убрать любые данные из столбцов D и E, если только вы не хотите, чтобы их перезаписывали :)