身份证中取日期的几个新公式

wshcw · 发表于 2008-11-9 17:14

这两天写了身份证中取日期的几个新公式,公式虽然较长,但老用以前的公式没意思,总想求新求变,主要也是想换换解题思路,公式不好,请大家提意见
新公式:
=MOD(TEXT(MID(A1,LEN(A1)/2,6),"0-00-00")-3236,36525)+3236
=MOD(TEXT(MID(A1,LEN(A1)/2,6),"0-00-00")-TODAY(),36525)+TODAY()-36525
=--RIGHT(TEXT((19&MID(A1,7,LEN(A1)/2-1)),"#-00-00"),10)
=--TEXT(MOD((19&MID(A1,7,LEN(A1)/2-1)),19*10^8),"#-00-00")
以下公式不能处理2000年后的问题
=MOD(TEXT(MID(A1,7,LEN(A1)/2-1),"#-00-00"),36525)
=MOD(TEXT(MID(A1,LEN(A1)/2,6),"0-00-00"),36525)
当然公式最完美的是:
=--RIGHT(TEXT(MID(A1,7,11),"19#-00-00,"),10)
=--TEXT(RIGHT(19&MID(A1,7,LEN(A1)/2-1),8),"#-00-00")

[ 本帖最后由 wshcw 于 2008-11-11 09:23 编辑 ]

天意fe · 发表于 2008-11-9 17:17

谢谢楼主分享

ebsnj · 发表于 2008-11-9 19:07

高手
向楼主学习

toby08 · 发表于 2008-11-9 21:16

支持创新，帮楼主顶一个。

学良 · 发表于 2008-11-10 07:38

老师又出新品了!

habf2008 · 发表于 2008-11-10 09:08

谢谢分享哈

x.f.zhao · 发表于 2008-11-10 10:07

=--TEXT(MID(A1,7,11),"0-00-00,")
=--RIGHT(TEXT(MID(A1,7,11),"1900-00-00,"),10)

wxm5945 · 发表于 2008-11-10 10:09

收下了,再次学习一下!

lws · 发表于 2008-11-10 10:38

感谢 wshcw兄分享

wshcw · 发表于 2008-11-10 13:35

千分符用得很精妙.堪称精品公式中精品.

[ 本帖最后由 wshcw 于 2008-11-10 13:37 编辑 ]

		自动登录	找回密码
密码			免费注册

[原创] 身份证中取日期的几个新公式

评分

回复 9楼 x.f.zhao 的帖子

最新热点 /1