excel vba在身份证中如何提取数字来判别男女(vba在身份证中怎么提取数字来判别男女)
excel中使用vba在身份證中提取數(shù)字來判別男女方法,有需要的朋友可以參考本文,一起來看看吧!
步驟
1、首先我們打開一個工作樣表作為例子。
使用alt+f11快捷鍵或者使用開發(fā)者工具進入vba編輯窗口。預先輸入身份證代碼變量。
在下面輸入以下代碼。
i = Right(sid, 1)
If Int(i / 2) = i / 2 Then '為偶數(shù)
sex = "女"
Else
sex = "男"
End If
MsgBox "性別:" + sex
End Sub
代碼解釋一下,首先對15位數(shù)身份證的末尾值取值,然后用if函數(shù)對i變量進行判斷,判斷的條件為i值是否為偶數(shù)。如果為偶數(shù)則性別顯示為女。
反之,則顯示性別為男。完成判斷需要輸入end if結(jié)束if判斷。然后輸入信息顯示函數(shù)msgbox來顯示性別的信息。
這個例子使用的是固定的變量,如果需要手動輸入身份證擁有更多的自主性,我們可以將固定變量的代碼修改一下。我把代碼放在圖片里,大家可以看看。
以上就是excel vba在身份證中怎么提取數(shù)字來判別男女方法介紹,操作很簡單的,大家學會了嗎?希望這篇文章能對大家有所幫助!
總結(jié)
以上是生活随笔為你收集整理的excel vba在身份证中如何提取数字来判别男女(vba在身份证中怎么提取数字来判别男女)的全部內(nèi)容,希望文章能夠幫你解決所遇到的問題。