Excel技巧1:将符合要求的多个单元格内容合并到一个单元格

Excel技巧1

在一个区域内,如下表中,A列有多个相同的内容,而对应的同一行B列中的值不相同,需要把这些不同的B列值组合到一个单元格中。
比如把所有“Alice”对应的B列情绪合并到C1单元格中,显示为“ Happy,Angry,Sad,”

《Excel技巧1:将符合要求的多个单元格内容合并到一个单元格》

如果用EXCEL自带的函数来做就比较麻烦,需要用数组公式,可以用自定义函数来解决,要方便的多。
参考来源: [ 将符合要求的多个单元格内容合并到一个单元格 百度经验 ]

步骤

第一步:插入用户模块

在EXCEL指定的sheet中按ALT+F11组合键,调出VBA窗口。在VBA窗口中按上面菜单栏中的“插入-模块”,就会在下面出现一个空白的模块窗口,把代码复制粘贴到这个窗口中就行了。

《Excel技巧1:将符合要求的多个单元格内容合并到一个单元格》

第二步:编写函数代码

可以看到自定义函数共有三个参数:参数a是要查找的区域;参数b是提取数据的区域;参数c是要查找的值。

Function abc(a As Range, b As Range, c As String)
Dim t As String
'如果a与b的区域大小不同,就显示“错误”
If a.Rows.Count <> b.Rows.Count Then abc = "错误": Exit Function
'在区域a是循环
For i = 1 To a.Rows.Count
'如果在a中找到与c相同的值,就把同一行中的b的内容提取出来,存入变量t中,且用","分隔。
If a.Cells(i, 1) = c Then t = t & b.Cells(i, 1) & ","
Next
'将变量的值赋给自定义函数
abc = t
End Function

第三步:运用

回到EXCEL窗口,在C2单元格中输入公式 =abc( A 2: A 9, B 2: B 9,A2)

《Excel技巧1:将符合要求的多个单元格内容合并到一个单元格》

按回车键后,马上显示出结果 Happy,Angry,Sad,

    原文作者:qq_zhangd
    原文地址: https://blog.csdn.net/qq_36981835/article/details/53584683
    本文转自网络文章,转载此文章仅为分享知识,如有侵权,请联系博主进行删除。
点赞