excel vba在身份证中怎么提取数字来判别男女?
步骤
1、首先我们打开一个工作样表作为例子。
使用alt+f11快捷键或者使用开发者工具进入vba编辑窗口。预先输入身份证代码变量。
在下面输入以下代码。
i = Right(sid, 1)
If Int(i / 2) = i / 2 Then '为偶数
sex = "女"
Else
sex = "男"
End If
MsgBox "性别:" + sex
End Sub
代码解释一下,首先对15位数身份证的末尾值取值,然后用if函数对i变量进行判断,判断的条件为i值是否为偶数。如果为偶数则性别显示为女。
反之,则显示性别为男。完成判断需要输入end if结束if判断。然后输入信息显示函数msgbox来显示性别的信息。
这个例子使用的是固定的变量,如果需要手动输入身份证拥有更多的自主性,我们可以将固定变量的代码修改一下。我把代码放在图片里,大家可以看看。
以上就是excel vba在身份证中怎么提取数字来判别男女方法介绍,操作很简单的,大家学会了吗?希望这篇文章能对大家有所帮助!
相关文章
Excel如何限制输入位数? excel单元格只能录入5位数字或文本的教程
excel单元格设置只能录入5位数字或文本,这个很简单的,跟着我的步骤,你一步步地仔细看,一定能够明白,时间宝贵,抓紧时间赶快看2024-09-28excel如何快速将数值批量扩大10倍? EXcel表格中数字扩大10倍的技巧
想要将电子表格中一列数据扩大10倍,该怎么批量实现呢?下面我们就来看看excel快速将数据扩大10倍的教程2024-09-28- 在本文中,我们将介绍10个对你的日常数据最有用的数据,以及如何使用它们,详细请看下文介绍2024-09-20
excel表格前几列不见了怎么办? excel前几列隐藏不显示的的解决教程
在使用Excel表格时,有时会遇到前几列不见的情况,这给我们的工作造成了一定的困扰,那么,我们该如何解决这个问题呢?详细请看下文介绍2024-09-15excel编号列隐藏了怎么办? excel最前面的编号列没了的解决教程
在使用Excel表格时,有时会遇到前几列不见的情况,这给我们的工作造成了一定的困扰,比如Excel表格中,序号通常是在第一列显示的,下面我们就来看看重新显示编号的教程2024-09-15excel怎么把重复项合并? excel将相同名字的数据合并在一起的教程
当我们在处理大批量数据时,需要将同类项(即重复项、想通的名字)合并在一起,提升数据的可读性,这样才易于理解,详细请看下文介绍2024-09-15多个重复值如何快速只统计一次? excel重复的数据设置只统计一次教程
excel表格中重复的数据很多,统计数据的时候,想要将重复数据只统计一次,该怎么操作呢?下面我们就来看看详细的教程2024-09-15excel表格数据怎么将大于100的标红小于80显示绿色? 条件格式详细用法
excel表格中有很多数据,想要让大于100的数据标红色,小于80的数据显示绿色,该怎么操作呢?下面我们就来看看详细的教程2024-09-13excel会计专用格式怎么设置? excel将单元格调整为会计专用的教程
在日常工作中,我们经常需要处理一些财务数据,Excel作为一款强大的电子表格工具,无疑是许多会计人员的得力助手,然而,要将Excel单元格调整为会计专用格式,你可能需要一2024-09-13Excel如何制作可选择日期的下拉菜单? excel设置下拉选择日期的教程
在日常办公学习使用Excel表格时,我们有时需要在表格中输入大量日期,如果一个个输入会比较繁琐,那么能否制作一个可以选择日期的下拉菜单,快速选择需要的日期呢?接下来2024-09-13
最新评论