excel常用函数公式及技巧搜集（常用的） 2013-5-31 EXCEL提供直观快捷的数据输入、强大灵活的数据处理、丰富多样的图表制作、完善快捷的报表设计、快速完备的统计分析功能，办公人员几乎没有不用到EXCEL的。如果我们只满足手工操作这些功能，那我们处理一些重复性的工作时就只能象机器人一样进行机械的操作。庆幸的是，OFFICE的开发者们为大家准备了一个好方法，那就是VBA。

哪些人需要VBA呢？

如果你是信息部门的员工：

可能会对EXCEL的应用深有体会，大量的数据处理，如果变动一个小地方就可能是几十、几百个文件或几千条记录的变动，有人会说我今天又要加班了，要是学会了VBA，想加班都没活干呀。^--^

如果你是办公室文员：

老板说：“把所有员工的考勤按日(月、季)做个线图给我看看”。My God！做这么多图，要累死人呀！没关系，要是学会了VBA作图部分，只需要几十分钟的时间写代码，再运行程序，OK，不到一分钟完成了！下次老板再让做，没关系，调出代码再运行一遍嘛，EASY! 如果你是刚毕业的大学生：

面对激烈的竞争，面试的时候，别人要花1小时才能完成的数据处理问题，你10分钟搞定，这时候主管一定会着急起来：“你什么时候能够上班… …”。

如果你想学VBA

VBA这么好，学起来会很难吗？不！其实VBA是程序语言中最易学，上手极快的一个，并不强调你必须要有专门的程序开发基础，因为EXCEL提供了VBA录制功能。即使你不会写代码也可以录制一段VBA代码去处理重复工作，如果忘记一些代码的语法了，录制一段代码就能看到了，所以学起来最容易了。

EXCEL VBA也

【身份证信息？提取】

从身份证号码中提取出生年月日

=TEXT(MID(A1,7,6+(LEN(A1)=18)*2),"#-00-00")+0

=TEXT(MID(A1,7,6+(LEN(A1)=18)*2),"#-00-00")*1

=IF(A2<>"",TEXT((LEN(A2)=15)*19&MID(A2,7,6+(LEN(A2)=18)*2),"#-00-00")+0,)

显示格式均为yyyy-m-d。（最简单的公式，把单元格设置为日期格式）

=IF(LEN(A2)=15,"19"&MID(A2,7,2)&"-"&MID(A2,9,2)&"-"&MID(A2,11,2),MID(A2,7,4)&"-"&MID(A2,11,2)&"-"&MID(A2,13,2))

显示格式为yyyy-mm-dd。（如果要求为“1995/03/29”格式的话，将”-” 换成”/”即可）

=IF(D4="","",IF(LEN(D4)=15,TEXT(("19"&MID(D4,7,6)),"0000年00月00日"),IF(LEN(D4)=18,TEXT(MID(D4,7,8),"0000年00月00日"))))

显示格式为yyyy年mm月dd日。（如果将公式中“0000年00月00日”改成“0000-00-00”,则显示格式为yyyy-mm-dd）

=IF(LEN(A1:A2)=18,MID(A1:A2,7,8),"19"&MID(A1:A2,7,6))

显示格式为yyyymmdd。

=TEXT((LEN(A1)=15)*19&MID(A1,7,6+(LEN(A1)=18)*2),"#-00-00")+0

=IF(LEN(A2)=18,MID(A2,7,4)&-MID(A2,11,2),19&MID(A2,7,2)&-MID(A2,9,2))

=MID(A1,7,4)&"年"&MID(A1,11,2)&"月"&MID(A1,13,2)&"日"

=IF(A1<>"",TEXT((LEN(A1)=15)*19&MID(A1,7,6+(LEN(A1)=18)*2),"#-00-00"))

从身份证号码中提取出性别

=IF(MOD(MID(A1,15,3),2),"男","女") （最简单公式）