Excel实现身份证号码自动转换为18位

　首先,我们假设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),"男","女"),)

　　最终结果如下图所示：