绿色圃中小学教育网

标题: Excel中将15位身份证号转换为18位! [打印本页]

作者: 桂馥兰香 时间: 2008-1-24 21:33
标题: Excel中将15位身份证号转换为18位!
Excel中将15位身份证号转换为18位!Excel中将15位身份证号转换为18位其实并不复杂，下面请跟我们来输入一些公式。
假设A列自A2起是身份证号（15位或18位）。
的电脑自学交流论坛- q, d% p, G# e, G
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),"男","女"),)! o& Y# Z. @/ u3 L d4 q, S1 c

最终结果如图：
H6 o$ }1 w, [) W

作者: 桂馥兰香 时间: 2008-1-24 21:34
标题: 回复：Excel中将15位身份证号转换为18位!
发这个帖子并不是要大家改身份证号码，而是要活用，解决我们学习工作中的问题！

欢迎光临绿色圃中小学教育网 (http://lspjy.com/)