![将 B 列转换为逗号分隔列表,“ORDER BY” Colum A](https://linux22.com/image/1474491/%E5%B0%86%20B%20%E5%88%97%E8%BD%AC%E6%8D%A2%E4%B8%BA%E9%80%97%E5%8F%B7%E5%88%86%E9%9A%94%E5%88%97%E8%A1%A8%EF%BC%8C%E2%80%9CORDER%20BY%E2%80%9D%20Colum%20A.png)
尝试在 excel 中开始使用 VB 只需要了解它是如何工作的,这个任务可以在 SQL 中完成,但我真的想知道如何在 excel 中轻松完成,A 列包含标准数字,B 列模型需要在 A 列中有唯一的零件编号记录,并且在 B 列中,可以用逗号分隔的模型列表来容纳这个部分。
Column A Column B
B00002455 C50EKB
B00002455 C50EKS
B00002455 C50EKW
B00002456 C50EKX
B00002456 C50ELB
寻找结果 -
ColumA ColumnB
B00002455 C50EKB, C50EKS, C50EKW
B00002456 C50EKX,C50ELB
答案1
如果它们顺序正确,这应该可以解决问题。如果不正确,则过滤 A 列。
Sub test()
Dim lastrow As Integer
lastrow = Cells(Rows.Count, "A").End(xlUp).Row
Dim i As Integer
For i = lastrow To 2 Step -1
If Cells(i, 1) = Cells(i - 1, 1) Then
Cells(i - 1, 2) = Cells(i - 1, 2) & ", " & Cells(i, 2)
Rows(i).EntireRow.Delete
End If
Next
End Sub
如果它们没有排序并且你不想过滤,我认为你将需要一本字典。