Excel 在列&;中拆分值;在另一列中放入编号相同的新行
我有一个电子表格,有两列:产品ID和类别。“产品ID”列中只有一个数字,但“类别”列中可以有多个数字,用逗号分隔。我需要的是,用逗号分隔的数字继续到新行,但保持相同的产品ID 现在的样子:Excel 在列&;中拆分值;在另一列中放入编号相同的新行,excel,Excel,我有一个电子表格,有两列:产品ID和类别。“产品ID”列中只有一个数字,但“类别”列中可以有多个数字,用逗号分隔。我需要的是,用逗号分隔的数字继续到新行,但保持相同的产品ID 现在的样子: PRODUCT ID | CATEGORIES 1 | 76,81 2 | 76,78 3 | 76,80 我需要的是: PRODUCT ID | CATEGORIES 1 | 76 1
PRODUCT ID | CATEGORIES
1 | 76,81
2 | 76,78
3 | 76,80
我需要的是:
PRODUCT ID | CATEGORIES
1 | 76
1 | 81
2 | 76
2 | 78
3 | 76
3 | 80
如何在excel中执行此操作,我需要一个公式来执行此操作。我有大约6000种产品,因此手动执行此操作不是一个选项
非常感谢您的帮助您可以使用:
Sub test()
Dim c As Range
Dim ID As Variant
Dim arrCategories() As String
Dim d As Range
Set d = Range("D1")
Dim i As Long
For Each c In Range(Range("A1"), Range("A1").End(xlDown))
ID = c.Value
arrCategories() = Split(c.Offset(0, 1).Text, ",")
For i = LBound(arrCategories) To UBound(arrCategories)
d.Value = ID
d.Offset(0, 1).Value = arrCategories(i)
Set d = d.Offset(1, 0)
Next i
Next c
End Sub
输入数据必须在A:B列中,从第1行开始
输出将从第1行开始写入D:E列
致以最良好的祝愿
西蒙对不起,是的,有些可能有3或4英寸,但确实不同。