EXCEL中VBA函数其中使用自定义函数JOINIF函数连接文本
发布时间:2022-03-26 05:22:55
小伙伴,请看下面的截图:左边是组别、姓名。我们希望通过EXCEL实现右边的效果。
先别往下面看哟!思考两分钟,你平时接触到的EXCEL函数能实现吗?
小奇老师给大家分享的是使用自定义函数JOINIF函数,来按条件连接文本。下面就一起学习处理字符串的自定义函数——JOINIF函数,先认识一下:函数名:JOINIF作用:对参数范围中符合指定条件的单元格内容进行连接。参数介绍:第一参数:(必须)条件区域,根据条件计算的单元格区域。第二参数:(必须)用于确定连接的条件。第三参数:(必须)要连接的实际单元格区域。通过上面的介绍,我们不难看出,JOINIF函数和SUMIF函数极其相似,只是功能上由求和变成了连接文本。下面我们通过一个例子:如下图,A、B列为数据源,分别为组别和姓名,目标是组织成D、E列的格式:解决方法:一、创建自定义函数:1、新建一个EXCEL文档,只保留一个工作表,其余删除。按ALT+F11,打开VBE编辑器,新建一个模块,把下面的自定义函数代码复制到模块中,关闭VBE编辑器。Function JOINIF(Rng1 As Range, Str, Rng2 As Range) Dim Arr, Brr Dim i As Long Dim j As Long Dim MyStr As String If Rng1.Rows.Count > 65536 Then Arr = Rng1.Resize(65536, Rng1.Columns) Brr = Rng2.Resize(65536, Rng1.Columns) Else Arr = Rng1 Brr = Rng2 End If
For i = 1 To UBound(Arr) For j = 1 To UBound(Arr, 2) If Arr(i, j) <> "" Then If Arr(i, j) = Str Then MyStr = MyStr & Brr(i, j) & "," End If Else Exit For End If Next j Next i JOINIF = Left(MyStr, Len(MyStr) – 1)End Function2、点击【文件】【另存为】,文件保存类型选择“Excel加载宏”。它将自动存入ADDIN文件夹中。3、从要使用此函数的EXCEL文件的【开发工具】-【加载宏】中勾选所保存的宏文件名,确定。就可以在工作表中的随心所欲的使用自定义的按条件连接文本函数啦。4、看一下使用效果,是不是很酷呢?


猜你喜欢
- Win11正式版发布以来,不少用户都选择了升级Win11正式版,但是如果是win11dev渠道,需要进行全新安装才能升级到正式版,那么要怎么
- 文件点击保存是默认替换了原有的文件,另存为时就可以更改保存的位置了,可以达到保存到指定文件夹的目的根据操作需要,有时候需要将WPS文字另存为
- Wise Care 365是一款系统清理工具,你可以使用其中的功能清理Windows的使用痕迹、擦除磁盘、粉碎文件。很多用户可能对这款工具比
- 在编辑Word文档时,有时候由于格式和其他一些特殊的要求,我们需要对文档每页的行数或者每行的字数进行规定,每页和行数和每行的字数均保持一个固
- Win10专业版如何在Skype消息添加书签?Skype是为语音和视频通话和聊天而开发的产品。您可以在计算机,平板电脑,智能手机和智能手表上
- 有朋友说这个公式真不好写啊!那交给你两个方法:1、收藏那篇文章,用到的时候,复制公式;2、学习今天这个另类方法。方法实现第一步:选定所有工作
- 不知大家是否知道Word安全模式呢?当朋友们在打开文档的时候出现一些Word问题提示的时候,按照上面的操作点击不发送然后就可以打开安全模式。
- 具体操作如下: 新建一个幻灯片,鼠标右键,设置背景颜色为样图背景色,这点很重要。 点击“插入-形状-圆形”按钮,然后设
- 电脑不能读取U盘怎么办?很多小伙伴会遇到u盘插入到电脑后无法读取的现象,下面,小编就为大家介绍下电脑不能读取U盘处理办法。原因一、U盘的驱动
- 咱们在 操纵WPS表格与Excel表格 停止 一样平常办公时, 常常 需求 使用到 林林总总的函数, 好比 许多数 学识题, 咱们 就能够
- 在excel2007版本之后,宏都是默认关闭的,如何能够启用宏呢,下面让小编为你带来07版excel表格怎么启用宏的方法。07版excel表
- 如何在Word中制作表格呢?相信很多朋友们都曾遇到过这个问题,下面小编就分享给大家在Word 中制作表格的技巧。就拿WPS2019软件为例,
- 鸿蒙系统推出后很多的小伙伴都非常的激昂但是还有大部分不知道详细的推送时间,所以今天就给你们带来了鸿蒙系统推送时间详情介绍,想知道的话就快来了
- Excel超级查找函数XLOOKUP函数的使用方法。微软新出了一个叫做XLOOKUP函数,功能简直强大得令人震撼!从此我们基本可以对传统的V
- U盘装系统可以说是为电脑装系统最方便快捷的方法,但是使用U盘装系统也经常会遇到一些问题,比如使用U盘装系统,重装完成之后重启电脑却出现“er
- 1、首先右键点击在Word中已经插入的表格,在弹出的选项中点击“表格属性”选项。2、然后在打开的表格属性对话框中找到“定位”选项,点击该选项
- 今日小编文章奉上啦~~秋天已经来临了,四个季节中小编最喜欢秋天了,那么ps怎么将秋天搭建出基本的场景呢?这就涉及到ps的技巧,下面我们就来看
- 你知道在wps怎样插入项目编号吗?下面就让小编告诉你wps插入项目编号的方法。wps插入项目编号的方法:打开一个新建的Wps文档。在空白处右
- 最近发布的更新补丁代号为KB3211320,和往常的一般性更新一样,依旧为常规更新,下文小编就为大家带来KB3211320下载地址,一起看看
- 为了便于远程办公,很多企业都在寻找适合远程办公时使用的沟通协作工具。而 WPS+云办公就是一款非常适合远程办公时使用的工具。要想使用 WPS