按条件合并多个excel单元格内容到同一单元格的自定义函数
发布时间：2023-09-16 17:40:55
Excel中的CONCATENATE函数可以将多个文本字符串联接成一个文本字符串，但有时需要按指定条件合并某些单元格的内容到一个单元格，这时CONCATENATE函数无法实现，而使用下面的自定义函数就十分方便了。如图所示，需要在F2单元格中将“调资额”为“190”的“姓名”用“、”连接起来。
步骤如下：
1.按Alt+F11，打开VBA编辑器，单击菜单“插入→模块”，在代码窗口中输入下列代码：
Function CONCATENATEIF(rng1 As Range, rng2 As Range, criteria As String, separator As String) As String
Dim arr()
Dim rCell As Range
Dim i As Integer, j As Integer
On Error Resume Next
j = WorksheetFunction.CountIf(rng2, criteria)
If j > 0 Then
ReDim arr(0 To j – 1)
For Each rCell In rng2
If WorksheetFunction.CountIf(rCell, criteria) Then
arr(i) = rng1.Item(1).Offset(rCell.Row – rng2.Row, rCell.Column – rng2.Column).Value
i = i + 1
End If
Next
For i = 0 To j – 1
CONCATENATEIF = CONCATENATEIF & arr(i) & IIf(i <> j – 1, separator, "")
Next
End If
End Function
上述代码定义了一个自定义函数CONCATENATEIF，共有四个参数，分别为需要连接单元格内容的区域（通常为单行或单列）、条件区域，条件和分隔符。使用该自定义函数时注意：
①参数中的两个区域的形状大小需相同；
②条件的输入类似COUNTIF函数，如 190、">100"、"苹果" 等，可使用通配符“*”、“?”。
2.返回Excel工作表界面，在F2单元格中输入公式：
=CONCATENATEIF($B$2:$B$16,$C$2:$C$16,E2,"、")
即可得到所需的结果。
0
投稿猜你喜欢
- 我们在制作wps演示文稿的时候，可能需要将其保存为pdf格式的文件来进行传输，下面就让小编告诉你wps演示怎样保存pdf格式文件。wps演示
nvidia控制面板是一款nvidia硬件控制工具，需要对显卡进行设置或者升级等都是通过这个控制面板进行。有小伙伴说自己的win10系统总控- 在word2007中，许多字符格式命令可以通过内置的快捷键访问。Word的老用户一定牢记有许多命令，然而，新手们可能需要一个快速向导。在 W
- SUMIF函数是我们日常工作中最常用到的，那你真的会用吗?今天与大家分享有关SUMIF函数案例。1、求“郑建杰”的总销售这里可以在单元格中输
- xp系统局域网传输是否Ping通可帮助用户分析和判定网络故障，现笔者介绍检查局域网IP能否Ping通的技巧如下：xp系统局域网传输的操作方法
- 微信现在是人们普遍使用的通讯方式，但有些Mac用户的微信收到消息后没有提示声，是微信的原因还是Mac的原因呢？下面我们分享如何解决Mac微信
- 听朋友说，最近在使用系统浏览器的时候经常遇到突然崩溃的状况，随之打开的网页都被意外的关闭了，查看的资料一下子全没了，又得从头再来。要怎么做才
- 在excel中使用排序时，经常都会使用到姓名排序的操作。对于刚从其它版本转型过来的应该就不会太懂吧，没关系下面让小编为你带来excel表格按
- 在我们回退了win10系统，恢复到之前使用的系统之后，如果想要重新升级到win10的话小伙伴们知道要怎么做吗~现在就让小编告诉你win10版
- 由于Excel自带的函数功能有限，有时我们需要通过自定义函数来满足实际功能的需求。可是对于自定义函数在工作表中的引用并不熟悉，往往给初学者造
- 方法首先，要做的是标题要规范。同一等级的标题，字体规范一样。比如在命名标题一、标题二的时候选择工具栏上的标题1规范。同理，下一等级的子标题也
- Excel表格宏怎么使用！小编使用Excel已经很多年，有关的功能基本都尝试过了，唯独宏这一块不敢轻易去尝试，听说“宏”貌似和计算机编程语
- 有时候我们在使用WPS的时候会遇到wps不能复制粘贴,那么wps中为什么不能复制粘贴呢?小编为大家解决wps中为什么不能复制粘贴,希望可以帮
- 数字签名是一种保护用户信息和房子篡改的功能，能够很好的帮助用户分辨软件是否是软件官方发布的。如果您使用的软件无需验证数字签名，或是经过修改的
- 要制作一个精致wps表格，一张好看的背景图片是少不了的，下面小编就为你介绍wps表格怎么样设置背景的方法啦!wps表格设置背景的方法：步骤一
- 我们经常会使用wps写一些文章，写完之后就喜欢在里面加页眉页脚来标注，但有时候常见的页眉页脚可能有些人不太喜欢，这个时候要怎么在wps自定义
- 在Microsoft office Excel中创建图表既快速又简便。Excel 提供了各种图表类型供您在创建图表时选择。有关可用图表类型的
- Win7电脑右下角的网络图标或者声音图标有时候会显示不了，小编也是找了很久才找到，网上有些是xp的，方法有很多，但是有些方法试过却发现根本不
- 在引用位置中则输入公式=INDEX(GET.WORKBOOK(1)，这操作有3秒就够了吧? 在目录工作表中。在插入窗口中双击选择目录，LEN
- SERIES公式控制着绘制Excel图表的数据，并且只在图表中有效，它不是真正的公式但可以像Excel公式一样在公式栏对其进行编辑。认识SE
