随着手机里面功能越来越丰富,让我们使用起来越来越方便了,给我们的生活带来了极大的便利。怎样使用VBA根据身份证号返回性别?
工具/原料
手机
方法/步骤
1、首先在开发工具中打开VBA编辑器
2、在单元格区域当中输入一些内容作为例子
3、在VBA编辑器中插入模块
4、在模块当中输入如下代码,然后运行Functionsex(rngAsVaria艘绒庳焰nt)'提取性别sex=VBA.I朐袁噙岿If((Mid(rng.Text,15,3)Mod2),"男","女")EndFunction
5、在单元格A1和A2中分别输入15位和18位的身份证号,在B1中输入公式“=Sex(瞢铍库祢a1)”,然后下拉,公式返回同样结果,即表示本函数可适应15位和18位身份证,如图