根据身份证号码自动录入男女及出生年月

andysky

百宝箱4.0有这个工具

gvntw

=TEXT(MOD(MID(I2,15,3),2),"男;;女")

夜慢

不错不错,[em05][em05]

andysky

=IF(MOD(MID(A1,15,3),2),"男","女")

bdyzf

十五位的怎么办

gvntw

QUOTE:

以下是引用bdyzf在2008-1-12 13:37:11的发言：
十五位的怎么办

上面好几楼的公式都适用15或18位。

dj8480

=IF(MOD(IF(LEN(I2)=15,MID(I2,15,1),MID(I2,17,1)),2)=1,"男","女")

如果身份证号码的长度是15位，那么提取第15位的数字。

如果身份证号码的长度不是15位，即18位身份证号码，那么应该提取第17位的数字。

如果除以2以后的余数是1，那么B2单元格显示为“男”，否则显示为“女”。

这样好想直观一些,省份证15和18位的都可以轻松分辨出来。

andysky

QUOTE:

以下是引用dj8480在2008-1-12 13:58:41的发言：

=IF(MOD(IF(LEN(I2)=15,MID(I2,15,1),MID(I2,17,1)),2)=1,"男","女")

如果身份证号码的长度是15位，那么提取第15位的数字。

如果身份证号码的长度不是15位，即18位身份证号码，那么应该提取第17位的数字。

如果除以2以后的余数是1，那么B2单元格显示为“男”，否则显示为“女”。

这样好想直观一些,省份证15和18位的都可以轻松分辨出来。

虽然直观，但公式本身不够简洁，显得笨拙。

简短的公式仍然求出正确的结果，自然是简短的好。

=IF(ISODD(MID(B3,9,9)),"男","女")---------这个更短

基本上不会有更短的了，除非自定义函数

SHENDA

版主你好:

你写的函数公式确实是最短的,但是我把你的公式用在上面的附件文件中时,确发现出现错误的结果,不知道为什么?EXCEL HOME是我非常喜欢的网站,在工作中遇到困难时在这里常常有意外的收获,希望网站办得越来越好.还有现在的身份证号尾号为X或H等字母是什么意思,给从尾数的奇偶来判断造成麻烦.

[此贴子已经被作者于2008-1-12 20:55:39编辑过]

andysky

QUOTE:

以下是引用SHENDA在2008-1-12 20:50:41的发言：

版主你好:

你写的函数公式确实是最短的,但是我把你的公式用在上面的附件文件中时,确发现出现错误的结果,不知道为什么?EXCEL HOME是我非常喜欢的网站,在工作中遇到困难时在这里常常有意外的收获,希望网站办得越来越好.还有现在的身份证号尾号为X或H等字母是什么意思,给从尾数的奇偶来判断造成麻烦.

ISODD函數在EXCEL 2007是隨時可以運用的

但在EXCEL 2003中需要加載分析工具才可以使用（工具---加載宏）

對於最後一位X，那是校驗碼，不影響公式計算