ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

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

[求助] 特定日期转换

[复制链接]

TA的精华主题

TA的得分主题

发表于 2019-12-6 21:46 | 显示全部楼层 |阅读模式
image.png

如图,不用VAB,如何实现?

TA的精华主题

TA的得分主题

发表于 2019-12-6 22:06 | 显示全部楼层
替换.zip (7.88 KB, 下载次数: 7)

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-12-6 22:17 | 显示全部楼层
本帖最后由 ph378 于 2019-12-6 22:52 编辑

谢了!
有个问题
image.png image.png 换了个值25后如下图
=SUBSTITUTE(SUBSTITUTE(A9,LOOKUP(1,-FIND(G$2:G$25,A9),G$2:G$25),LOOKUP(1,-FIND(G$2:G$25,A9),ROW($1:$25))),IFERROR(LOOKUP(1,-FIND(G$2:G$25,SUBSTITUTE(A9,LOOKUP(1,-FIND(G$2:G$25,A9),G$2:G$25),LOOKUP(1,-FIND(G$2:G$25,A9),ROW($1:$20)))),G$2:G$25),""),IFERROR(LOOKUP(1,-FIND(G$2:G$25,SUBSTITUTE(A9,LOOKUP(1,-FIND(G$2:G$25,A9),G$2:G$25),LOOKUP(1,-FIND(G$2:G$25,A9),ROW($1:$25)))),ROW($1:$25)),""))
image.png 第二次改了又个值25=SUBSTITUTE(SUBSTITUTE(A10,LOOKUP(1,-FIND(G$2:G$25,A10),G$2:G$25),LOOKUP(1,-FIND(G$2:G$25,A10),ROW($1:$25))),IFERROR(LOOKUP(1,-FIND(G$2:G$25,SUBSTITUTE(A10,LOOKUP(1,-FIND(G$2:G$25,A10),G$2:G$25),LOOKUP(1,-FIND(G$2:G$25,A10),ROW($1:$25)))),G$2:G$25),""),IFERROR(LOOKUP(1,-FIND(G$2:G$25,SUBSTITUTE(A10,LOOKUP(1,-FIND(G$2:G$25,A10),G$2:G$25),LOOKUP(1,-FIND(G$2:G$25,A10),ROW($1:$25)))),ROW($1:$25)),""))
image.png
可能25限制了,改为26后正常

=SUBSTITUTE(SUBSTITUTE(A11,LOOKUP(1,-FIND(G$2:G$26,A11),G$2:G$26),LOOKUP(1,-FIND(G$2:G$26,A11),ROW($1:$26))),IFERROR(LOOKUP(1,-FIND(G$2:G$26,SUBSTITUTE(A11,LOOKUP(1,-FIND(G$2:G$26,A11),G$2:G$26),LOOKUP(1,-FIND(G$2:G$26,A11),ROW($1:$26)))),G$2:G$26),""),IFERROR(LOOKUP(1,-FIND(G$2:G$26,SUBSTITUTE(A11,LOOKUP(1,-FIND(G$2:G$26,A11),G$2:G$26),LOOKUP(1,-FIND(G$2:G$26,A11),ROW($1:$26)))),ROW($1:$26)),""))


image.png



image.png

TA的精华主题

TA的得分主题

发表于 2019-12-6 23:26 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2019-12-7 00:39 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
数组公式
=IFERROR(INDEX(ROW($1:$99),MATCH(1=1,LEFT(A2,FIND("年",A2)-1)=SUBSTITUTE(TEXT(ROW($1:$99),"[DBNum1]"),"一十","十"),0),)&"年","")&IFERROR(INDEX(ROW($1:$99),MATCH(1=1,MID(A2,IFERROR(FIND("年",A2)+1,1),10)=SUBSTITUTE(TEXT(ROW($1:$99),"[DBNum1]"),"一十","十")&"个月",0),)&"个月","")

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-12-7 19:41 | 显示全部楼层
本帖最后由 ph378 于 2019-12-7 20:20 编辑
YZC51 发表于 2019-12-6 23:26
请参考
=MATCH(A38,TEXT(ROW($1:$100),"[

谢了!
测试不行
image.png

TA的精华主题

TA的得分主题

发表于 2019-12-7 20:16 | 显示全部楼层
ph378 发表于 2019-12-7 19:41
谢了!
测试不行
超级版主方法可行。只需改几个数!

=IF(ISERR(FIND("年",A2)),"",MATCH(LEFT(A2,FIND("年",A2)-1),TEXT(ROW($1:$100),"[<32][dbnum1]d;[dbnum1]"),)&"年")&IF(ISERR(FIND("个月",A2)),"",MATCH(SUBSTITUTE(MID(A2,FIND("年",A2)+1,99),"个月",""),TEXT(ROW($1:$100),"[<32][dbnum1]d;[dbnum1]"),)&"个月")

数组

评分

1

查看全部评分

TA的精华主题

TA的得分主题

发表于 2019-12-7 20:22 | 显示全部楼层
本帖最后由 YZC51 于 2019-12-7 21:32 编辑

可以自己变通下
中文数字转阿拉伯数字-.zip (8.41 KB, 下载次数: 5)

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-12-7 20:25 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
本帖最后由 ph378 于 2019-12-7 20:28 编辑
YZC51 发表于 2019-12-7 20:16
=IF(ISERR(FIND("年",A2)),"",MATCH(LEFT(A2,FIND("年",A2)-1),TEXT(ROW($1:$100),"[

image.png
谢了!
无“年”的不行

TA的精华主题

TA的得分主题

发表于 2019-12-7 20:27 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
参看图片
untitled1.png
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

关闭

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

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

GMT+8, 2024-4-25 08:06 , Processed in 0.051945 second(s), 13 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

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

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

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