Excel表格或WPS表格中用公式验证身份证号码
来源:原创 更新时间:2018-04-13 13:25:24 编辑:Legend 浏览:8845
新身份证号码验证
=IF(RIGHT(b2,1)=MID("10X98765432",MOD(SUM(MID(b2,ROW(INDIRECT("1:17")),1)*2^(18-ROW(INDIRECT("1:17")))),11)+1,1),"","错误")
旧号转新号
=LEFT(B2,6)&"19"&RIGHT(B2,9)&MID("10X98765432",MOD(SUM(MID(LEFT(B2,6)&"19"&RIGHT(B2,9),ROW(INDIRECT("1:17")),1)*2^(18-ROW(INDIRECT("1:17")))),11)+1,1)
以上代码,按shift+ctrl+enter生效。
新号转旧号:=left(b2,6) & mid(b2,9,9)
身份证中取性别:
新旧号通用:=if(mod(if(len(b2)=18,mid(b2,17,1),right(b2,1)),2)=0,"女","男")
身份证中取年龄:
通用:=DATEDIF(TEXT(IF(LEN(b2)=18,MID(b2,7,8),"19"&MID(b2,7,6)),"0-00-00"),TODAY(),"Y")