提取身份证信息,我们从IIF说起。
呐呢! IIF? 国际金融协会么?
呵呵,你想多了。
我们先看一个在工作表提取身份证中人员性别的函数公式:
函数释义:
MID:从指定位置截取一定位数的字符串,在此是指从身份证证的15位开始,截取3位有效数字(如果是旧身份证号,只提取1位),以第一个身份证号码为例,提取的即是439;
MOD:求余函数,即求得439除以2的余数,此时结果为1;
IF:条件判断函数,但结果为真时,显示第一个结果,否则显示第二个结果;同时,在工作表中使用IF判断时,非0即为正确,所以省略了=1这个条件。
那么这段函数又有什么意义呢,请看以下代码:
从这可以看出,在Excel工作表中用的一些函数,同样适用于VBA。比如Mid,Mod。只不过Mod的用法,和工作表函数稍微有点差别而已。
另外,在VBA中的IIF函数,用法和工作表函数IF差不多。
现在知道我为什么要秀这么一段工作表函数了吧。。。。
不是说,提取身份证的信息么,难道身份证里面只有性别??
答案是否定的!!
为了方便各位学习代码,下面这段代码将全部注释。
以下是结果:
从上例,我们必须掌握以下几点:
1、定位工作表有效行数的方法之一:调用Ctrl ↑组合键;在定位最后一行的时候,一定要找单列在最后一行有数据的列,不要找那些经常有空单元格的列,切记;
2、断行:当一段代码过长时,我们可以在代码的中间按空格加下划线并回车的方式,将长代码断成几行;
3、注释:要习惯对关键性代码进行注释,以免后期维护的时候,难以读懂;注释我们一般是以单引号开头,可以写在空行,也可以写在代码的尾部;注意,代码的前面添加单引号的话,此代码将无法执行!!
一天学一点,一天进步一点!!
学习VBA,重要的是不停地敲打代码,光看是学不好的哟。那还等什么呢,赶快行动吧!
联系客服