易表在线答疑技术与交流用户社区 → 哪位高人能写个15位升18位身份证号码的函数吗~~


  共有8598人关注过本帖树形打印复制链接

主题:哪位高人能写个15位升18位身份证号码的函数吗~~

帅哥哟,离线,有人找我吗?
fuanzj
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:184 积分:367 威望:0 精华:0 注册:2007/5/15 14:01:00
哪位高人能写个15位升18位身份证号码的函数吗~~  发帖心情 Post By:2017/11/2 8:45:00 [只看该作者]

excel有现成的15位升级18位身份证号码函数,搜索了论坛好像没有大神发布过这个。
哪位能给写个吗~~多谢了

 回到顶部
帅哥哟,离线,有人找我吗?
lyang70
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:5115 积分:862 威望:0 精华:0 注册:2006/8/15 16:57:00
  发帖心情 Post By:2017/11/6 10:36:00 [只看该作者]

这个15位和18位好像是有规则的,应该可以,有时间的话可以试试看...

 回到顶部
帅哥哟,离线,有人找我吗?
fuanzj
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:184 积分:367 威望:0 精华:0 注册:2007/5/15 14:01:00
  发帖心情 Post By:2017/11/7 8:34:00 [只看该作者]

那函数的复杂程度,真心不是菜鸟能搞定的~~~~
看着都眼花,电子表格版本的:
=(REPLACE(A2,7,,19))&(INDEX({1,0,"X",9,8,7,6,5,4,3,2},1,(MOD(SUM(MID(REPLACE(A2,7,,19),1,1)*7+MID(REPLACE(A2,7,,19),2,1)*9+MID(REPLACE(A2,7,,19),3,1)*10+MID(REPLACE(A2,7,,19),4,1)*5+MID(REPLACE(A2,7,,19),5,1)*8+MID(REPLACE(A2,7,,19),6,1)*4+MID(REPLACE(A2,7,,19),7,1)*2+MID(REPLACE(A2,7,,19),8,1)*1+MID(REPLACE(A2,7,,19),9,1)*6+MID(REPLACE(A2,7,,19),10,1)*3+MID(REPLACE(A2,7,,19),11,1)*7+MID(REPLACE(A2,7,,19),12,1)*9+MID(REPLACE(A2,7,,19),13,1)*10+MID(REPLACE(A2,7,,19),14,1)*5+MID(REPLACE(A2,7,,19),15,1)*8+MID(REPLACE(A2,7,,19),16,1)*4+MID(REPLACE(A2,7,,19),17,1)*2),11))+1))
[此贴子已经被作者于2017/11/7 10:03:11编辑过]

 回到顶部