excel函数验证18位身份证格式是否正确

=IF(LEN(B2)=0," ",IF(LEN(B2)=15,"一代身份证号",IF(LEN(B2)<>18,"位数错误",IF(CHOOSE(MOD(SUM(MID(B2,1,1)*7+MID(B2,2,1)*9+MID(B2,3,1)*10+MID(B2,4,1)*5+MID(B2,5,1)*8+MID(B2,6,1)*4+MID(B2,7,1)*2+MID(B2,8,1)*1+MID(B2,9,1)*6+MID(B2,10,1)*3+MID(B2,11,1)*7+MID(B2,12,1)*9+MID(B2,13,1)*10+MID(B2,14,1)*5+MID(B2,15,1)*8+MID(B2,16,1)*4+MID(B2,17,1)*2),11)+1,1,0,"X",9,8,7,6,5,4,3,2)=IF(ISNUMBER(RIGHT(B2,1)*1),RIGHT(B2,1)*1,"X"),"正确","错误"))))

标签：excel