Excel 工资表的身份证号码15位转到18位怎么转
发布网友
发布时间:2022-04-28 22:41
我来回答
共1个回答
热心网友
时间:2022-06-24 10:34
假设原身份证在A列
B1输入
=IF(LEN(A1)=15,REPLACE(A1,7,,19)&MID("10X98765432",MOD(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("10X98765432",MOD(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)
这个是派出所的事情吧,需要操心吗