Excel使用vba从身份证中提取数字来区分男女。有需要的朋友可以参考这篇文章。让我们来看看!
步骤
1.首先我们打开一个工作样表作为例子。
使用alt f11快捷键或开发工具进入vba编辑窗口。输入预ID代码变量。
在下面输入以下代码。
i=Right(sid,1)
如果Int(i/2)=i/2,那么'是偶数。
性别='女性'
其他
性别='男性'
如果…就会结束
MsgBox '性别:'性别
末端接头
解释代码。先取15位身份证末尾的值,然后用if函数判断I变量。判断的条件是I值是否偶数。如果是偶数,性别显示为女性。
否则说明性别是男性。要完成判断,需要输入end if来结束if判断。然后进入信息显示功能msgbox显示性别信息。
这个例子使用了一个固定变量。如果需要手动输入身份证有更多的自主权,我们可以修改固定变量的代码。我把代码放在图中了,大家可以看看。
以上是excel vba如何从身份证中提取数字来区分男女的方法介绍。操作很简单。你学会了吗?希望这篇文章能对大家有所帮助!