excel怎么合并同类项数据并用逗号分隔符分开
来源:网络收集 点击: 时间:2024-05-06原始数据如下,A列包含重复的姓名,B列是对应的不同数量或者说型号。需要将A列数据去除重复值,并且将B列的同一个人的数量合并在一个单元格里并用逗号分开。

将AB列的抬头,复制到CD列。

按Alt+F11进入VBE界面。

选择【插入】-【模块】插入一个模块。


在模块空白处粘贴下列代码:
Sub yy()
Dim Arr, i, d, Myr
Set d = CreateObject(Scripting.Dictionary)
.Clear
Myr = .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
.Resize(d.Count, 1) = Application.Transpose(k)
.Resize(d.Count, 1) = Application.Transpose(t)
End Sub

返回excel界面,点击【开发工具】,插入一个按钮。

用鼠标左键在工作表中画出一个按钮,并指定宏至刚才插入的宏。

点击按钮就可以完成合并的过程。

如果您觉得此经验有用,可以点击本页面右上方的【大拇指】图案和【收藏按钮】或者右下方的【分享】按钮,也可以点击本注意事项下方的【收藏】按钮。
如需要了解更多内容,可以百度搜索“百度经验shaowu459”或到百度知道向我提问。
同类项分隔符版权声明:
1、本文系转载,版权归原作者所有,旨在传递信息,不代表看本站的观点和立场。
2、本站仅提供信息发布平台,不承担相关法律责任。
3、若侵犯您的版权或隐私,请联系本站管理员删除。
4、文章链接:http://www.1haoku.cn/art_688352.html