excel利用自定义函数获取多个单元格中相同的字符
发布时间：2023-08-30 01:45:02
标签：excel,利用,自定义,函数,获取,多个,单元格,中
要在Excel中获取区域内各单元格字符串中的相同字符，可用下面的自定义函数。例如要在D1单元格获取A1:C1区域各单元格中相同的字符，如图：
按Alt+F11，打开VBA编辑器，单击菜单“插入→模块”，在代码窗口中输入自定义函数：
Function GetDupChars(rRng As Range) As String
Application.Volatile
Dim i As Integer, j As Integer, k As Integer
Dim Str As String
Str = rRng.Item(1).Text
For i = 1 To Len(Str)
k = 0
For j = 2 To rRng.Cells.Count
If InStr(rRng.Item(j).Text, Mid(Str, i, 1)) Then k = k + 1
Next
If k = j - 2 And InStr(GetDupChars, Mid(Str, i, 1)) = 0 _
Then GetDupChars = GetDupChars & Mid(Str, i, 1)
Next
End Function
然后关闭VBA编辑器，在D1单元格中输入公式即可：
=GetDupChars(A1:C1)
0
投稿猜你喜欢
PSD是Adobe Photoshop程序的图像格式，此格式允许用户编辑不同的图像图层，然后对其进行平滑处理。一般丢失PSD文件的原因主要有- PPT幻灯片中怎么插入小红旗标记重要内容？PPT幻灯片中有很多重要的内容，为了标记重要的内容，我们可以使用小红旗来标记，下面我们就来看看详细
- 当你打开你的Win11电脑之后，发现桌面上无任何图标，这是什么情况，这对于日常会产生很大影响，怎么解决呢？遇到相同问题的小伙伴，下面一起来看
- Mac聚焦搜索Spotlight 搜不到文件怎么办？有时发现聚焦搜索不管用了，搜索不到任何文件，下面是解决方法：在 「启动台」 – 「实用工
- WWDC21会在6月8日凌晨一点举行，而这天 Apple 会公开 iOS 15、iPadOS 15、macOS 12、watchOS 8、t
- 不知道大家是否注意到没，最近朋友圈突然刷屏了，人人都在都忙着做一件事情，就是在直播平台上答题。当你在特定的直播答题APP上答对题目时，就能赢
- 本文整理两个excel中使用vba添加批注的案例，分享给大家学习。vba添加批注案例一：为选中的一个单元格自动添加批注，批注内容为系统当天日
- 我们一般都会在wps文档中添加页眉，如果我们不需要用到页眉，那么，我们应该怎样将其删除呢?下面就让小编告诉你wps文字怎样删除页眉。wps文
- Microsoft Office是微软公司开发的一套基于 Windows 操作系统的办公软件套装。常用组件有 Word、Excel、Powe
- 问题描述：iOS13.4系统，一直使用蜂窝数据，现无法更改app的蜂窝数据使用权限。在设置中更改后，仍然变回初始的设置状态，还是不能使用蜂窝
- 相信许多小伙伴在自己的 Mac 用了一段时间后，查看磁盘空间时，总会发出这样的疑问：磁盘里面这么多东西到底是什么？别担心，又到了该整理硬盘、
- 目前线上关于微软Office的相关内容的教程很丰富，但是关于国产WPS的介绍比较少见，从本文开始，小编将正式进入“WPS 文字”的具体内容讲
- 大家都知道下拉菜单的做法，那么，二级下拉菜单是如何制作的呢。下面让小编为你带来excel2007 怎么做二级下拉菜单的方法。excel200
- 现在，不少小伙伴都在使用win10创意者系统，有时候我们遇到关机时提示有程序阻止的状况，Win10创意者可以一键关闭所有程序哦。那么，Win
- 当我们要在Word文档中使用图片时，会复制粘贴一些图片进文档。但我们有时候只用图片里面的一部分，该怎么操作呢?下面小编就为大家详细介绍一下，
- 在excel中经常需要对数据做分类汇总操作，这个分类汇操作有个操作前提，就是先要对分类的关键字做排序操作，然后才可以完成分类汇总操作。如图，
- 事情中， 假如 咱们 碰到 空缺格 散布 状况 比力乱， 需求往 内里 添补内容的 时分， 咱们是 怎样 处置的呢？ 许多小 同伴 城市 接
- 笔记本的便携性是不少需要在多场合使用电脑用户的首选，不论是上班外出还是学习工作，笔记本都能随时展开，但是笔记本的便携性也会导致硬件在狭小的空
- Excel计算停车时间停车费是IF函数的一个经典应用实例。下面咱们就一起来体验一下使用 IF 函数进行停车费统计。excel停车时间有一个约
- 微软推送Win10 Mobile预览版10586.338累积更新,需要的朋友可以一起看看内存过高原因分析：在360浏览器3.x的多进程的框架
