ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[Excel 函数与公式] [第97期]按倒序不重复取出数字排列(三)[已评分]

[复制链接]

TA的精华主题

TA的得分主题

发表于 2013-9-4 15:40 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
粘个位置先!!!!

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2013-9-5 15:50 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖最后由 大氵寿 于 2013-9-12 15:05 编辑

一直被EXCEL2003的公式7层所困扰,不得不用最原始的方法,但是公式就超长了,哎,先交作业吧,先求有,再琢磨怎么精简。

  1. =IF(LOOKUP(,-RIGHT(A1:A14)),"",0)&SUM(RIGHT(SMALL(MATCH(ROW(1:10)-1,--RIGHT(LARGE((MID(A1:A14,COLUMN(A:DF),1)<>"")*(ROW(1:14)*10^4+COLUMN(A:DF)*10)+1*(0&MID(A1:A14&"0123456789",COLUMN(A:DF),1)),ROW(1:1540))),)*10+ROW(1:10)-1,ROW(1:10)))*INT(10^(COUNT(MATCH(ROW(1:10)-1,LARGE(IF(ISERR(FIND({0,1,2,3,4,5,6,7,8,9},A1:A14)),-1,COLUMN(A:J)-1),ROW(1:140)),))-ROW(1:10))))
复制代码
365个字符,



补充内容 (2013-9-13 09:26):
对于扩充到200行,需要修改的参数:(总行高由14变为200)
(1),区域A1:A14 ;   (2) , 参数1540= (总行高14)*110 ;  ( 3 ), 参数140=(总行高14)*10 ;

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2013-9-5 16:52 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖最后由 大氵寿 于 2013-9-10 16:45 编辑

sorry, 不了解规则第一次参加,请删除本楼.

点评

请只占一个楼层!  发表于 2013-9-6 10:03

TA的精华主题

TA的得分主题

发表于 2013-9-5 17:24 | 显示全部楼层
本帖最后由 CheryBTL 于 2013-9-10 13:55 编辑

原来还有问题,375:
  1. =IF(COUNT(FIND(COLUMN(A:I),A:A))*(LOOKUP(1,-RIGHT(A:A))=0),0,"")&SUM(MOD(SMALL(IF((MMULT(-(ROW(1:14)<COLUMN(B:O)),(FIND(COLUMN(A:J)-1,A1:A14&1/17)>LEN(A1:A14))-1)=1)*ISNUMBER(FIND(COLUMN(A:J)-1,A1:A14)),FIND("@",SUBSTITUTE(A1:A14,COLUMN(A:J)-1,"@",LEN(A1:A14)-LEN(SUBSTITUTE(A1:A14,{0,1,2,3,4,5,6,7,8,9},))))/1%+ROW(1:14)/1%%+COLUMN(A:J)-1,10^8),ROW(1:10)),10)*10^ROW(2:11))%
复制代码
若03版可用,A:A改为A1:A14即可。

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2013-9-5 19:17 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖最后由 opqazxc 于 2013-9-6 17:04 编辑

又编辑不了
  1. =IF(LOOKUP(1,-RIGHT(A1:A14)),,0)&SUM(RIGHT(LARGE(IF(ISNA(MATCH("*"&ROW(1:10)-1&"*",A1:A14&"",)),,MATCH(ROW(1:10),1+MID(LOOKUP(15-ROW(1:1400)%,ROW(1:14),A1:A2),1-MOD(ROW(1:1400),-100),1),)/1%+ROW(10:19)),ROW(1:10)))%*10^ROW(2:11))
复制代码
``我也想在原帖改
可不让编辑
就补充   补充又不能超过200字符好像

所以只好再补一贴了

现在这楼还可以编辑





本帖子中包含更多资源

您需要 登录 才可以下载或查看,没有账号?免费注册

x

点评

再发现随意占楼层,将取消参赛资格!!!  发表于 2013-9-6 10:04

TA的精华主题

TA的得分主题

发表于 2013-9-6 08:05 | 显示全部楼层
本帖最后由 大氵寿 于 2013-9-10 16:47 编辑

sorry, 不了解规则第一次参加,请删除本楼.

点评

再发现随意占据楼层将取消参赛资格!!!  发表于 2013-9-6 10:06

TA的精华主题

TA的得分主题

发表于 2013-9-10 12:49 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖最后由 wyf22006 于 2013-9-13 13:00 编辑

260个字符
  1. =IF(LOOKUP(,-RIGHT(A1:A14)),"",0)&INT(SUM(RIGHT(LARGE(MATCH("*"&ROW(1:10)-1,LARGE(((10^9+ROW(1:14)*10^6+COLUMN(A:CV))&MID(A1:A14,COLUMN(A:CV),1))/1,ROW(1:20000))&"",)*10+ROW(1:10)-1,ROW(1:10)))*10^(ROW(1:10)-(11-COUNT(MATCH("*"&ROW(1:10)-1&"*",A1:A14&"",))))))
复制代码
225个字符
PS:在极端情况下需要将row(1:900)修改成row(1:2020);如200行数据都是一个数字每一行数字都是100个字符
  1. =MID(10^11+SUM(RIGHT(SMALL(-(MATCH("*"&ROW(1:10)-1,SMALL(-(10^6+ROW(1:14)*10^3+COLUMN(A:CV)&MID(A1:A14,COLUMN(A:CV),1)),ROW(1:900))&"",)&(ROW(1:10)-1)),ROW(1:10)))*10^ROW(1:10)),2,COUNT(MATCH("*"&ROW(1:10)-1&"*",A1:A14&"",)))
复制代码


评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2013-9-10 18:50 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
本帖最后由 wlc5201130 于 2013-9-10 22:25 编辑

=MID(SUM(-RIGHT(LARGE(-(MATCH("*"&COLUMN(A:J)-1&"",LARGE(((0&RIGHT(A1:A15)&MID(IF(A1:A15="",5^19,A1:A15),101-COLUMN(A:CV),1))+(ROW(1:15)/1%%-COLUMN(A:CV)/1%)*(A1:A15<>"")),ROW(1:1500))&"",)&COLUMN(A:J)-1),ROW(1:10)))*10^-ROW(1:10)),4,COUNT(MATCH("*"&ROW(1:10)-1&"*",A1:A14&"",)))
数组
279字符
=MID(SUM(-RIGHT(LARGE(-(MATCH("*"&COLUMN(A:J)-1&"",LARGE(((0&RIGHT(A1:A15)&MID(IF(A1:A15="",5^19,A1:A15),101-COLUMN(A:CV),1))+(ROW(1:15)/1%%-COLUMN(A:CV)/1%)*(A1:A15<>"")),ROW(1:1500))&"",)&COLUMN(J:S)),ROW(1:10)))*10^-ROW(1:10)),4,COUNT(MATCH("*"&ROW(1:10)-1&"*",A:A&"",)))
274字符

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2013-9-18 12:21 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2013-9-22 16:53 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
我也看不到,有什么用?
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关闭

最新热点上一条 /1 下一条

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

GMT+8, 2024-4-25 14:54 , Processed in 0.042537 second(s), 8 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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