ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[已解决] 找出连续的数字

[复制链接]

TA的精华主题

TA的得分主题

发表于 2023-3-21 13:38 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
solextrade 发表于 2023-3-21 13:34
没注意C列还有数字个数

我看了你的,才突然发现这个。

TA的精华主题

TA的得分主题

发表于 2023-3-21 13:39 | 显示全部楼层
jivy1212 发表于 2023-3-21 13:38
我看了你的,才突然发现这个。

老师的 TEXT 和 MID 用的好啊

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-3-21 14:14 | 显示全部楼层
我把前面几位老师的公式一一做了对比,发现只有9楼老师的第2个公式和模拟结果最接近,唯一不一样的就是这位老师的是按数字从低到高排列,而模拟数据里的是按先后出现的顺序排列。仅有此一点瑕疵。请问9楼老师还有可以进一步改进公式的可能吗?
image.png

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-3-21 14:17 | 显示全部楼层
jivy1212 发表于 2023-3-21 13:25
这样?还是这样,只会高版,2019以上或WPS

请问老师,您这第2条函数是最接近模拟结果的,您看上面我的一一对比,请问还有改进的可能吗,把结果按照数字出现的先后顺序列出来。

TA的精华主题

TA的得分主题

发表于 2023-3-21 14:53 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
image.png ,=IF(C2,REDUCE(,TOCOL(1/OFFSET(D2,,,MATCH(1=0,C3:C15="",-1),10)^-1,3),LAMBDA(x,y,IFS(COUNT(FIND({"-","/"},x))=0,IF(ROUND(y-x,0)=1,x&"-"&y,x&"/"&y),1,LET(_x,TEXTAFTER(x,{"-","/"},-1),_y,TEXTBEFORE(x,_x),_Z,RIGHT(_y),IF(ROUND(y-_x,0)=1,IF(_Z="/",x&"-"&y,_y&y),x&"/"&y))))),"")

TA的精华主题

TA的得分主题

发表于 2023-3-21 15:00 | 显示全部楼层
绿茶青青 发表于 2023-3-21 14:17
请问老师,您这第2条函数是最接近模拟结果的,您看上面我的一一对比,请问还有改进的可能吗,把结果按照 ...

从逻辑角度来说没啥难度,但是从公式角度太烦了,把ROW($1:$999)改成对应的统计区域就成N(INDIRECT(TEXT(SMALL(ROW(OFFSET($A$1,ROW()-1,,(INT(C2/10)+1)))*100+COLUMN(D:M),ROW(OFFSET($A$1,,,(INT(C2/10)+1)*10))),"R0C00"),)),这玩意有三段,所以改成以后就是
  1. =IF(C2,MID(CONCAT(IFERROR(MID("/-/",MMULT(1-COUNTIF(OFFSET(D2:M2,,,C2/10+1),N(INDIRECT(TEXT(SMALL(ROW(OFFSET($A$1,ROW()-1,,(INT(C2/10)+1)))*100+COLUMN(D:M),ROW(OFFSET($A$1,,,(INT(C2/10)+1)*10))),"R0C00"),))-{1,-1}),{1;2}),1)&IF(1/COUNTIF(OFFSET(D2:M2,,,C2/10+1),N(INDIRECT(TEXT(SMALL(ROW(OFFSET($A$1,ROW()-1,,(INT(C2/10)+1)))*100+COLUMN(D:M),ROW(OFFSET($A$1,,,(INT(C2/10)+1)*10))),"R0C00"),)))^-1,N(INDIRECT(TEXT(SMALL(ROW(OFFSET($A$1,ROW()-1,,(INT(C2/10)+1)))*100+COLUMN(D:M),ROW(OFFSET($A$1,,,(INT(C2/10)+1)*10))),"R0C00"),))),"")),2,66),"")
复制代码
如果是365上新函数有多行多列转换函数就可以短

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2023-3-21 15:11 | 显示全部楼层
  1. =REDUCE(, TOCOL(D8:M10,3), LAMBDA(x,y, IFS(COUNT(FIND({"-","/"}, x)) = 0, IF(y - x = 1, x & "-" & y, x & "/" & y), 1, LET(_x, TEXTAFTER(x, {"-","/"}, -1), _y, TEXTBEFORE(x, _x), _z, RIGHT(_y), IF(y - _x = 1, IF(_z = "/", x & "-" & y, _y & y), x & "/" & y)))))
复制代码

365版本

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-3-21 15:11 | 显示全部楼层
sucx007 发表于 2023-3-21 14:53
,=IF(C2,REDUCE(,TOCOL(1/OFFSET(D2,,,MATCH(1=0,C3:C15="",-1),10)^-1,3),LAMBDA(x,y,IFS(COUNT(FIND({"- ...

感谢出手,但是我不是365的菜啊。

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-3-21 15:12 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助

感谢老僧出手,等以后买了365就试试

TA的精华主题

TA的得分主题

 楼主| 发表于 2023-3-21 15:28 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
jivy1212 发表于 2023-3-21 15:00
从逻辑角度来说没啥难度,但是从公式角度太烦了,把ROW($1:$999)改成对应的统计区域就成N(INDIRECT(TEXT( ...

强大,完美,漂亮。
感谢,十分感谢。
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

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

GMT+8, 2024-11-16 09:37 , Processed in 0.032796 second(s), 8 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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