Excel获取身份证信息

我列出来的已经是日常工作中能遇到的绝大多数情况了，

应对工作已经不成问题了

获取性别

=IF(LEN(A1)=18,IF(MOD(MID(A1,17,1),2)=0,"女","男"),"非18位")

获取出生日期（年/月/日）

=IF(LEN(A1)=18,DATE(MID(A1,7,4),MID(A1,11,2),MID(A1,13,2)),"非18位")

获取带点带0出生年月（1988.02）

=IF(LEN(A1)=18,MID(A1,7,4)&"."&MID(A1,11,2),"非18位")

获取带点不带0出生年月（1988.2）

=IF(LEN(A1)=18,MID(A1,7,4)&"."&VALUE(MID(A1,11,2)),"非18位")

获取年龄（周岁）

=IF(LEN(A1)=18,DATEDIF(DATE(MID(A1,7,4),MID(A1,11,2),MID(A1,13,2)),NOW(),"y"),"非18位")

获取年龄（虚岁）

=IF(LEN(A1)=18,YEAR(NOW())-MID(A1,7,4),"非18位")

获取18位身份证校验信息

=MID("10X98765432",MOD(SUMPRODUCT(MID(A1,ROW(INDIRECT("1:17")),1)*2^(18-ROW(INDIRECT("1:17")))),11)+1,1)=RIGHT(A1)

带点日期转为标准日期格式：如1988.2->(date)1988/2/1

=DATE(LEFT(A1,SEARCH(".",A1)-1),RIGHT(A1,LEN(A1)-SEARCH(".",A1)),1)

身份证信息提取.xlsx