根据身份证号码编写.docVIP

假设原身份证在A列 B1输入 =IF(LEN(A1)=15,REPLACE(A1,7,,19)MID(10MOD(SUM(MID(REPLACE(A1,7,,19),ROW(INDIRECT(1:17)),1)*2^(18-ROW(INDIRECT(1:17)))),11)+1,1),A1) 下拉公式 这个是数组公式，不要按回车，按ctrl+shift+回车结束公式输入 如果觉得不喜欢数组，下面是非数组的。正常回车即可 =IF(LEN(A1)=15,CONCATENATE(MID(A1,1,6),19,MID(A1,7,9),MID(10MOD(MID(A1,1,1)*7+MID(A1,2,1)*9+MID(A1,3,1)*10+MID(A1,4,1)*5+MID(A1,5,1)*8+MID(A1,6,1)*4+1*2+9*1+MID(A1,7,1)*6+MID(A1,8,1)*3+MID(A1,9,1)*7+MID(A1,10,1)*9+MID(A1,11,1)*10+MID(A1,12,1)*5+MID(A1,13,1)*8+MID(A1,14,1)*4+MID(A1,15,1)*2,11)+1,1)),A1) 假如以A1列输入身份证号码（公式中的A表示身份证号码列） 1、出生年月日 在A1单元格中输入身份证号码，在B1单元格中输入以下内容 =DATE(MID(A1,7,2+INT(LEN(A1)/16)*2),MID(A1,9+INT(LEN(A1)/16)*2,2),MID(A1,11+INT(LEN(A1)/16)*2,2)) 在C1单元格中输入以下内容 =DATEDIF(A1,TODAY(),Y) 就可以得出结果 =是函数公式计算的开始 DATE（年，月，日）函数的意思大概是将数字组合成规范的日期格式； MID（目标单元格，从第几位开始提取，提取多少位）函数的意思大概是将目标单元格按要求的从第几位开始提取，取多少位数字出来； INT（数值）函数的大概意思是取整数； LEN（文本/数值）函数的大概意思是计算文本/数值的个数，不是字节； 2、年龄（两种方法） =DATEDIF(RIGHT(TEXT(MID(A1,7,11)-500,#-00-00,),10),NOW(),Y)日期减法； =IF(LEN(A1)=15,YEAR(NOW())-1900-VALUE(MID(A1,7,2)),IF(LEN(A1)=18,YEAR(NOW())-VALUE(MID(A1,7,4)),身份证错)) 3、性别 =IF(LEN(A1)=15,IF(MOD(VALUE(RIGHT(A1,3)),2)=0,女,男),IF(LEN(A1)=18,IF(MOD(VALUE(MID(A1,15,3)),2)=0,女,男),身份证错)) 在电子表格中将15为身份证号码转换成18位 假设原身份证号码在A列 B1输入 =IF(LEN(A1)=15,REPLACE(A1,7,,19)MID(10MOD(SUM(MID(REPLACE(A1,7,,19),ROW(INDIRECT(1:17)),1)*2^(18-ROW(INDIRECT(1:17)))),11)+1,1),A1) 这个是数组公式，不要按回车，按ctrl+shift+回车结束公式输入 如果觉得不喜欢数组，下面是非数组的。正常回车即可 =IF(LEN(A1)=15,CONCATENATE(MID(A1,1,6),19,MID(A1,7,9),MID(10MOD(MID(A1,1,1)*7+MID(A1,2,1)*9+MID(A1,3,1)*10+MID(A1,4,1)*5+MID(A1,5,1)*8+MID(A1,6,1)*4+1*2+9*1+MID(A1,7,1)*6+MID(A1,8,1)*3+MID(A1,9,1)*7+MID(A1,10,1)*9+MID(A1,11,1)*10+MID(A1,12,1)*5+MID(A1,13,1)*8+MID(A1,14,1)*4+MID(A1,15,1)*2,11)+1,1)),A1)