用Excel将15位身份证号转换为18位

电 算 化36151阅读模式

假设A列自A2起是身份证号(15位或18位)。

1、身份证号全部改为18位,输入数组公式:=IF(LEN(A2)=15,REPLACE(A2,7,,19)&MID("10X98765432",MOD(SUM(MID(REPLACE(A2,7,,19),ROW(INDIRECT("1:17")),1)*2^(18-ROW(INDIRECT("1:17")))),11)+1,1),A2)

注意:数组公式输入方法:输入公式后不要按回车,而是按Ctrl+Shift+Enter。

2、身份证号全部改为15位,输入公式:=IF(LEN(A2)=15,A2,LEFT(REPLACE(A2,7,2,),15))

3、计算出生日期:=IF(A2"",TEXT((LEN(A2)=15)*19&MID(A2,7,6+(LEN(A2)=18)*2),"#-00-00")+0,)

4、判断性别:=IF(A2"",IF(MOD(RIGHT(LEFT(A2,17)),2),"男","女"),)

最终结果如图:

用Excel将15位身份证号转换为18位

文章末尾固定信息

weinxin
我的微信
我的微信
微信扫一扫
  • 本文由 发表于 2016年2月22日 17:29:49
  • 转载请务必保留本文链接:http://wangkj.com/kuai-ji-shi-wu/dian-shuan-hua/201602580.html
评论  3  访客  2  作者  1
    • 285978511 1

      身份证校对公示,注:公式中身份证所在单元格为C2,数据组公式,按CTRL+SHIFT+回车结束。
      =IF(AND(LEN(C2)=18,MID(“10X98765432″,MOD(SUM(MID(C2,ROW($1:$17),1)*2^(18-ROW($1:$17))),11)+1,1)=RIGHT(C2)),”身份证正确”,”身份证错误”)

      • 天天 0

        现学现用了。不错

      发表评论

      匿名网友

      :?: :razz: :sad: :evil: :!: :smile: :oops: :grin: :eek: :shock: :???: :cool: :lol: :mad: :twisted: :roll: :wink: :idea: :arrow: :neutral: :cry: :mrgreen:

      确定

      取消