ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[Excel 函数与公式] [开_156]统计提取出现频次最高的类[开帖待评]

  [复制链接]

TA的精华主题

TA的得分主题

发表于 2021-7-5 17:15 | 显示全部楼层 |阅读模式
本帖最后由 delete_007 于 2021-9-23 17:30 编辑

题目说明:
    1、ABC三列为字母、数字、汉字三类信息。取值范围分别为字母:大小写英文字母;数字:0~9;汉字:所有中文汉字。
    2、根据信息类别,提取出现频次最高的类的信息。当三类信息出现频次相同时,都提取,如A3:C3。

答题要求:
    1、在F列写入公式,不允许其他操作。
    2、公式中只允许引用数据源区域,ROW和COLUMN函数除外。
    3、使用EXCEL 2003版本函数,不允许365。(出题时考虑不周,忘记加版本限制。又难以分清高版本都支持哪些函数,直接降至最低版,减少争议,带来不便,敬请谅解。)

评分规则:
    1、小于等于105字符(含等号)的正确答案,评1技术分。
    2、最佳答案(字符数最少)评2技术分。

竞赛日期:
    2021-7-5至2021-8-1

统计提取出现频次最高的类.rar (14.36 KB, 下载次数: 418)
题目来自小書生
题目.png



评分

12

查看全部评分

TA的精华主题

TA的得分主题

发表于 2021-7-5 21:41 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖最后由 静听溪流 于 2021-7-9 09:05 编辑

78字符
  1. =CONCAT(IF(LEN(CODE(A2:C2)+35)=MODE.MULT(LEN(CODE(A2:C2)+35)*{1;1}),A2:C2,""))
复制代码
第一次修改   77字符
  1. =CONCAT(IF(LEN(CODE(A2:C2)+35)=MODE.MULT(LEN(CODE(A2:C2)+{35;35})),A2:C2,""))
复制代码

低版本公式:
  1. =REPLACE(A2&B2&C2,8-MOD(SUM((LEN(CODE(A2:C2)+35)=MODE.MULT(LEN(CODE(A2:C2)+{35;35})))*{2,3,4}),8),1,)
复制代码
  1. =REPLACE(A2&B2&C2,TEXT(SUM((FREQUENCY(LEN(CODE(A2:C2)+35),LEN(CODE(A2:C2)+35))=1)*{1;2;3;4}),"0;;4"),1,)
复制代码
精简下101字符
  1. =REPLACE(A2&B2&C2,8-MOD(-SUM((FREQUENCY(LEN(CODE(A2:C2)+35),LEN(CODE(A2:C2)+35))=1)*{1;2;3;4}),8),1,)
复制代码
艰难地匍匐前进  92字符
  1. =REPLACE(A2&B2&C2,MOD(26-MAX(MMULT((LEN(CODE(A2:C2)+35)={2;3;5})*{11,12,13},{1;1;1})),9),1,)
复制代码
嘻嘻……又能减2个字符
  1. =REPLACE(A2&B2&C2,ABS(26-MAX(MMULT((LEN(CODE(A2:C2)+35)={2;3;5})*{11,12,13},{1;1;1}))),1,)
复制代码
yohohoho yohohoho~~~  83字符
  1. =REPLACE(A2&B2&C2,ABS(26-MAX(MMULT(N(LEN(CODE(A2:C2)+35)={2;3;5}),{11;12;13}))),1,)
复制代码
再减3字符  80字符
  1. =REPLACE(A2&B2&C2,ABS(18-MAX(MMULT(N(LEN(CODE(A2:C2)+35)={2;3;5}),{7;8;9}))),1,)
复制代码





点评

版本限制2003  发表于 2021-7-6 11:53

评分

13

查看全部评分

TA的精华主题

TA的得分主题

发表于 2021-7-5 21:44 | 显示全部楼层
本帖最后由 dim麻辣君 于 2021-7-19 22:24 编辑

先占个楼94:
  1. =REPLACE(A2&B2&C2,MIN(4-IFNA((A2:C2>"z")+(A2:C2>9)<>MODE((A2:C2>"z")+(A2:C2>9)),)*{3,2,1}),1,)
复制代码
加一个高版:79:
  1. =CONCAT(IF(IFNA(MODE((A2:C2>"z")+(A2:C2>9))=(A2:C2>"z")+(A2:C2>9),1),A2:C2,""))
复制代码
03版:104
  1. =REPLACE(A2&B2&C2,MIN(4-(1-ISERROR(1/((A2:C2>"z")+(A2:C2>9)<>MODE((A2:C2>"z")+(A2:C2>9)))))*{3,2,1}),1,)
复制代码
03版:101
  1. =REPLACE(A2&B2&C2,LEFT(SUM(((A2:C2>"z")+(A2:C2>9)<>MODE((A2:C2>"z")+(A2:C2>9),4,4))*{2,4,6}*5+2)),1,)
复制代码


评分

14

查看全部评分

TA的精华主题

TA的得分主题

发表于 2021-7-5 22:08 | 显示全部楼层
本帖最后由 delete_007 于 2021-9-23 11:16 编辑
  1. =REPLACE(A2&B2&C2,MIN(IFNA(IF(MODE(-IF(A2:C2>"z",2,A2:C2>"9"))+IF(A2:C2>"z",2,A2:C2>"9"),{1,2,3},4),4)),1,)
复制代码

先来常规的,有空再来,另一种思路

补充内容 (2021-7-14 21:07):
  1. =REPLACE(A2&B2&C2,TEXT(SUM(IF(MODE((A2:C2>"z")+(A2:C2>9),9,9)-(A2:C2>"z")-(A2:C2>9),{1,2,3})),"0;;6"),1,)
复制代码


补充一个能的1技术分的!

评分

11

查看全部评分

TA的精华主题

TA的得分主题

发表于 2021-7-5 22:32 | 显示全部楼层
本帖最后由 delete_007 于 2021-9-23 11:16 编辑

=CONCAT(IFERROR(IF(MODE(--TEXT(CODE(A2:C2),"[<58]1;[<114]2;3"))=--TEXT(CODE(A2:C2),"[<58]1;[<114]2;3"),A2:C2,""),A2:C2))
虽然超了105的字符限制,但是先占个楼,万一我相通了呢…………(PS:虽然可能性微乎其微)
2021年7月6日8:58
经由大佬一个match点拨,砍掉万恶的text+code,成功砍至92字符
=CONCAT(IFERROR(IF(MODE(MATCH(A2:C2,{0,"A","吖"}))=MATCH(A2:C2,{0,"A","吖"}),A2:C2,""),A2:C2))
我的春天来了

2021年7月7日0:15
规则变化以后,绞尽脑汁
=SUBSTITUTE(A2&B2&C2,INDEX(A2:D2,TEXT(SUM((MATCH(A2:C2,{0,"A","吖"})={1;2;3})*COLUMN(A:C)*(MMULT(N(MATCH(A2:C2,{0,"A","吖"})={1;2;3}),{1;1;1})=1)),"[=0]4;[<4]0;4")),)
164字符
=REPLACE(A2&B2&C2,TEXT(SUM((MATCH(A2:C2,{0,"A","吖"})={1;2;3})*{1,2,3}*(MMULT(N(MATCH(A2:C2,{0,"A","吖"})={1;2;3}),{1;1;1})=1)),"[=0]4;[<4]0;4"),1,)
146字符
=REPLACE(A2&B2&C2,TEXT(SUM((MATCH(A2:C2,{0,"A","吖"})<>MODE(MATCH(A2:C2,{0,"A","吖"}),4,4))*{1,2,3}),"[=0]4;[<4]0;4"),1,)
119字符
  1. =REPLACE(A2&B2&C2,TEXT(SUM((MATCH(A2:C2,{0,"A","吖"})<>MODE(MATCH(A2:C2,{0,"A","吖"}),0,0))*{1,2,3}),"0;;4"),1,)
复制代码

110字符
离成功还差5个字符…………
image.png

点评

版本限制2003  发表于 2021-7-6 11:53

评分

11

查看全部评分

TA的精华主题

TA的得分主题

发表于 2021-7-5 23:00 | 显示全部楼层
本帖最后由 delete_007 于 2021-9-23 11:17 编辑

=IFNA(TEXTJOIN(,,IF((A2:C2>9)*LENB(A2:C2)=MODE((A2:C2>9)*LENB(A2:C2)),A2:C2,"")),A2&B2&C2)

=REPLACE(A2&B2&C2,IFERROR(MATCH(1=0,(A2:C2>9)*LENB(A2:C2)=MODE((A2:C2>9)*LENB(A2:C2)),),4),1,)

2003版公式:
  1. =REPLACE(A2&B2&C2,ABS(SUM((LENB(A2:C2)*(A2:C2>9)<>MEDIAN(LENB(A2:C2)*(A2:C2>9)))*{7,8,9})-6),1,)
复制代码


点评

版本限制2003  发表于 2021-7-6 11:54

评分

7

查看全部评分

TA的精华主题

TA的得分主题

发表于 2021-7-5 23:33 | 显示全部楼层
本帖最后由 delete_007 于 2021-9-23 11:17 编辑
  1. =CONCAT(IFNA(IF(MATCH(A2:C2,{0;"A";"啊"})=MODE(MATCH(A2:C2,{0;"A";"啊"})),A2:C2,""),A2:C2))
复制代码
  1. =REPLACE(A2&B2&C2,IFERROR(MIN(IF(LENB(A2:C2)+(A2:C2>9)-MODE(LENB(A2:C2)+(A2:C2>9)),{1,2,3},9)),9),1,)
复制代码
公式1为2019版,公式2为2003版





补充内容 (2021-9-25 14:34):
iferror不是03版,忘了。

点评

IFERROR高版函数  发表于 2021-9-24 10:35

评分

9

查看全部评分

TA的精华主题

TA的得分主题

发表于 2021-7-5 23:46 | 显示全部楼层
  1. =CONCAT(IFNA(IF(LOOKUP(CODE(A2:C2),{0,58,123})=MODE(LOOKUP(CODE(A2:C2),{0,58,123})),A2:C2,""),A2:C2))
复制代码

点评

CONCAT/IFNA高版函数  发表于 2021-9-24 10:36
版本限制2003  发表于 2021-7-6 11:55

评分

5

查看全部评分

TA的精华主题

TA的得分主题

发表于 2021-7-6 00:19 | 显示全部楼层
本帖最后由 delete_007 于 2021-9-23 11:18 编辑

=REPLACE(A2&B2&C2,ABS(SUM((MODE(LENB(T(+A2:C2)),9,9)<>LENB(T(+A2:C2)))*{7,4,3})-6),1,)





                            ↓



=REPLACE(A2&B2&C2,IFNA(MATCH(1=1,MODE(LENB(T(+A2:C2)))<>LENB(T(+A2:C2)),),4),1,)

                            ↓


=CONCAT(IF(IFNA(MODE(LENB(T(+A2:C2)))=LENB(T(+A2:C2)),1),A2:C2,""))

补充内容 (2021-7-9 12:34):
  1. =REPLACE(A2&B2&C2,ABS(SUM((MODE(LENB(T(+A2:C2)),9,9)=LENB(T(+A2:C2)))*{5,4,3})-6),1,)
复制代码

评分

9

查看全部评分

TA的精华主题

TA的得分主题

发表于 2021-7-6 00:41 | 显示全部楼层
本帖最后由 delete_007 于 2021-9-23 11:19 编辑

=CONCAT(IFNA(IF(MATCH(A2:C2,{0,"a","吖"})=MODE(MATCH(A2:C2,{0,"a","吖"})),A2:C2,""),A2:C2))

补充内容 (2021-9-10 22:14):
上次刚玩  不会补充内容  还重复占楼了  现在补上

补充内容 (2021-9-10 22:15):

  1. =TRIM(REPLACE(" "&A2&B2&C2,SUM((LENB(T(+A2:C2))<>MODE(LENB(T(+A2:C2)),4,4))*{1,2,3},1),1,))
复制代码

点评

版本限制2003  发表于 2021-7-6 11:56

评分

6

查看全部评分

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

本版积分规则

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

GMT+8, 2024-11-22 13:01 , Processed in 0.060476 second(s), 24 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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