ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 45772|回复: 77

[原创] 雷同字符提取函数 自定义函数

  [复制链接]

TA的精华主题

TA的得分主题

发表于 2012-6-21 00:04 | 显示全部楼层 |阅读模式
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖已被收录到知识树中,索引项:自定义函数开发
本帖最后由 yjh_27 于 2013-1-26 17:25 编辑

雷同字符提取函数
2013.1.25更新
增加第一、第三、四参数判断
雷同字符提取函数V1.1

2012.6.22更新
增加返回选择

=LeiTong(C2,E2,4,1)      

第一二参数:比较文字
第三参数:4个字符相同则判断雷同
第四参数:1 返回雷同字符
                       2 返回雷同字数
                       3 返回雷同度(基准第一参数)




能比较出  A2单元格与C2单元格中“内容雷同”的公式,也就是说把相同的内容显示在E2单元格
=LeiTong(A2,C2,4)      
4:判断雷同起始字符数

(在E2设定,也能满足下拉)

   



补充内容 (2013-5-12 00:25):
可以只下最新版

雷同字符提取函数应用.rar

13.54 KB, 下载次数: 2103

雷同字符提取函数V1.1.rar

13.09 KB, 下载次数: 2499

评分

9

查看全部评分

TA的精华主题

TA的得分主题

 楼主| 发表于 2012-6-21 00:17 | 显示全部楼层
与此类似
[求助] 貌似有难度。。。比较b列每行数据,相同字符超过10个,保留一行,剩余的删除
http://club.excelhome.net/forum. ... d=875909&page=1

4L

TA的精华主题

TA的得分主题

发表于 2012-6-21 00:26 | 显示全部楼层
貌似 word 的比较合并文档………………

TA的精华主题

TA的得分主题

 楼主| 发表于 2013-1-23 13:37 | 显示全部楼层
本帖最后由 yjh_27 于 2013-1-25 22:42 编辑

应用实例
http://club.excelhome.net/forum. ... 6&page=2#pid6674005     13楼

满足自动生成地点、次数统计要求

增加同类名统计,见附件test1_lt
360截图20130119015428843.jpg

test_lt.zip

18.65 KB, 下载次数: 280

test1_lt.zip

19.06 KB, 下载次数: 294

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2013-1-25 12:36 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2013-1-25 12:59 | 显示全部楼层
wzq47111 发表于 2013-1-25 12:36
雷同度如何定义?

雷同字数/第一参数字数

TA的精华主题

TA的得分主题

发表于 2013-1-26 21:17 | 显示全部楼层
Thanks  a lot.Good codes.

TA的精华主题

TA的得分主题

发表于 2013-1-27 22:16 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
有讲解,有案例,非常的好。。。进来的得好好学习一下

TA的精华主题

TA的得分主题

 楼主| 发表于 2013-5-11 17:50 | 显示全部楼层
增加归类自定义函数

GuiLei(find_text, within_text, n , m ,  mode ,  mode2 )
'归类
'find_text 归类字符,""时由within_text生成
'within_text 归类
'n 连续n字符开始计数
'm 计数m 及以上归类
'mode  输出方式 0 同类排列,去重
'               1 仅1 find_text
'               2 仅2 同类数量
'               3 仅3 同类名
'               4 仅1、2
'               5 仅2、3
'               6 仅1、3
'     (非0~6) 7 全部
'mode2 输出方式 0 不排序
'               1 升序
'       (非1)-1 降序

雷同字符提取函数V2.rar

19.94 KB, 下载次数: 385

TA的精华主题

TA的得分主题

 楼主| 发表于 2013-5-11 20:05 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
为  两组数据模糊匹配以一对多的问题(在线等)    增加mode

'               30 仅3 同类名,合并至一个单元格,无分隔
'               31 仅3 同类名,合并至一个单元格," "分隔
'               32 仅3 同类名,合并至一个单元格,","分隔
'               33 仅3 同类名,合并至一个单元格,";"分隔
'               34 仅3 同类名,合并至一个单元格,":"分隔
'               35 仅3 同类名,合并至一个单元格,"|"分隔
'               36 仅3 同类名,合并至一个单元格,"_"分隔

雷同字符提取函数V2.1.rar

25.21 KB, 下载次数: 518

您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-11-15 01:55 , Processed in 0.048420 second(s), 16 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表