excel怎麼合併同類項資料並用逗號分隔符分開?

在實際工作中，有時候需要在excel中將同類型的資料的某些特徵或屬性值合併在一起，如下圖的示例，需要將同一個人對應的數量合併到一個單元格中，並用逗號分開。本例介紹如何在excel中實現這種合併。

工具/原料

Excel

操作步驟：

原始資料如下，A列包含重複的姓名，B列是對應的不同數量或者說型號。需要將A列資料去除重複值，並且將B列的同一個人的數量合併在一個單元格里並用逗號分開。

將AB列的擡頭，複製到CD列。

按Alt+F11進入VBE介面。

選擇【插入】-【模組】插入一個模組。

在模組空白處貼上下列程式碼：

Sub yy()

Dim Arr, i&, d, Myr&

Set d = CreateObject("Scripting.Dictionary")

[c2:d65535].Clear

Myr = [a65536].End(xlUp).Row

Arr = Range("a1:c" & Myr)

For i = 2 To UBound(Arr)

If Not d.exists(Arr(i, 1)) Then

d(Arr(i, 1)) = Arr(i, 2)

Else

d(Arr(i, 1)) = d(Arr(i, 1)) & "," & Arr(i, 2)

End If

Next

k = d.keys

t = d.items

[c2].Resize(d.Count, 1) = Application.Transpose(k)

[d2].Resize(d.Count, 1) = Application.Transpose(t)

End Sub

返回excel介面，點選【開發工具】，插入一個按鈕。

用滑鼠左鍵在工作表中畫出一個按鈕，並指定巨集至剛才插入的巨集。

點選按鈕就可以完成合並的過程。