VBA入门讲解

一、VBA简单介绍

Excel VBA是依附在Excel中的二次开发语言,全称为Visual Basic For ApplicationVBA更重的应用在与开发插件和设计运算系统(财务,人事管理系统).VBA的功能发挥到机制时候,很多平常需要数小时的计算工作,VBA能在三两秒内完成。

二、提取身份证号计算案例

a) 实现方式1

A1处输入身份证号 

B2输入fx的函数计算

=DATEDIF(DATE(MID(A1,7,4-(LEN(A1)=15)*2),MID(A1,11-(LEN(A1)=15)* 2,2),MID(A1,13-(LEN(A1)=15)*2,2)),NOW(),"Y")

在C2输入fx的函数计算

=TEXT(RIGHT(19&MID(A1,7,LEN(A1)/2-1),8),"#年##月##日")

在D2输入fx的函数计算

=IF(ISODD(MID(A1,15,3)),"男","女")

效果如下:

当你输入身份证号的时候。 年龄和日期和性别都会自动计算出来。这就是优势,在 你手动输入的时候会出错。所以vba提供的计算是相当占优势

b) 实现方式2

将函数改成VBA的内置函数  参数:1为对单元格引用,2为信息描述(不区分大小写)

=SFZ(A1,"NL") 计算年龄

=SFZ(A1,"SR") 计算生日

=SFZ(A1,"XB")=SFZ(A1) 计算性别

c) 实现方式3

这个实现比较抽象了,安装好VBA的插件,批量获取身份证信息.xlam赋值到一下启动文件夹中即完成安装

C:\Progran Fukes\Mircrosoft Office\Office14\XLSTART

选择B2B5右击选择批量获取身份证信息,确定计算区域 该对话框中默认显示当前区域 就哦了

或者选择身份证的单元格,该区域的地址会自动产生对话框,选择显示年龄等区域,只要输入  $B$2:$B$5 就搞定了


你可能感兴趣的:(Date,工作,Excel,Office,语言,VBA)