1、excel常用函数公式及技巧搜集常用的EXCEL提供直观快捷的数据输入、强大灵活的数据处理、丰富多样的图表制作、完善快捷的报表设计、快速完备的统计分析功能，办公人员几乎没有不用到EXCEL的。如果我们只满足手工操作这些功能，那我们处理一些重复性的工作时就只能象机器人一样进行机械的操作。庆幸的是，OFFICE的开发者们为大家准备了一个好方法，那就是VBA。哪些人需要VBA呢？如果你是信息部门的员工：可能会对EXCEL的应用深有体会，大量的数据处理，如果变动一个小地方就可能是几十、几百个文件或几千条记录的变动，有人会说我今天又要加班了，要是学会了VBA，想加班都没活干呀。-如果你是办公室文员：老板
2、说：“把所有员工的考勤按日(月、季)做个线图给我看看”。My God！做这么多图，要累死人呀！没关系，要是学会了VBA作图部分，只需要几十分钟的时间写代码，再运行程序，OK，不到一分钟完成了！下次老板再让做，没关系，调出代码再运行一遍嘛，EASY!如果你是刚毕业的大学生：面对激烈的竞争，面试的时候，别人要花1小时才能完成的数据处理问题，你10分钟搞定，这时候主管一定会着急起来：“你什么时候能够上班 ”。如果你想学VBAVBA这么好，学起来会很难吗？不！其实VBA是程序语言中最易学，上手极快的一个，并不强调你必须要有专门的程序开发基础，因为EXCEL提供了VBA录制功能。即使你不会写代码也可以录
3、制一段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,
4、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
5、(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)从身份证号码中提取出性
6、别=IF(MOD(MID(A1,15,3),2),男,女) （最简单公式）=IF(MOD(RIGHT(LEFT(A1,17),2),男,女)=IF(A2” ”,IF(MOD(RIGHT(LEFT(A2,17),2),”男”,”女”),)=IF(VALUE(LEN(ROUND(RIGHT(A1,1)/2,2)=1,男,女)从身份证号码中进行年龄判断=IF(A3”,DATEDIF(TEXT(LEN(A3)=15*19&MID(A3,7,6+(LEN(A3)=18*2),”#-00-00”),TODAY(),”Y”),)=DATEDIF（A1，TODAY（），“Y”）（以上公式会判断是否已过生日而自
7、动增减一岁）=YEAR(NOW()-MID(E2,IF(LEN(E2)=18,9,7),2)-1900=YEAR(TODAY()-IF(LEN(A1)=15,19&MID(A1,7,2),MID(A1,7,4)=YEAR(TODAY()-VALUE(MID(B1,7,4)&岁=YEAR(TODAY()-IF(MID(B1,18,1)=,CONCATENATE(19,MID(B1,7,2),MID(B1,7,4)按身份证号号码计算至今天年龄=DATEDIF(TEXT(LEN(A1)=15)*19&MID(A1,7,6+(LEN(A1)=18)*2),#-00-00),TODAY(),y)以200
8、6年10月31日为基准日,按按身份证计算年龄(周岁)的公式=DATEDIF(TEXT(MID(A1,7,6+(LEN(A1)=18)*2),#-00-00)*1,2006-10-31,y)按身份证号分男女年龄段按身份证号分男女年龄段，身份证号在K列，年龄段在J列（身份证号为18位）男性16周岁以下为1男性16周岁（含16周岁）以上至50周岁为 2男性50周岁（含50周岁）以上至60周岁为 3男性60周岁（含60周岁）以上为 4女性16周岁以下为1女性16周岁（含16周岁）以上至45周岁为 2女性45周岁（含45周岁）以上至55周岁为 3女性55周岁（含55周岁）以上为 4=MATCH(DATE
9、DIF(DATE(MID(K1,7,4),MID(K1,11,2),MID(K1,13,2),TODAY(),y),0,16,50,60-0,0,5,5*ISEVEN(MID(K1,17,1)=SUM(-(DATEDIF(MID(K1,7,4)&/&MID(K1,11,2)&/&MID(K1,13,2),TODAY(),y)=0,16,45,55+0,0,5,5*MOD(MID(K1,17,1),2)【年龄和工龄计算】根据出生年月计算年龄DATEDIF(A1,TODAY(),y)DATEDIF(A1,TODAY(),y)&周岁DATEDIF(A1,NOW(),y)根据出生年月推算生肖中国人有1
10、2生肖，属什么可以推算出来。即用诞生年份除以12，再用除不尽的余数对照如下：0猴，1鸡，2狗，3猪，4鼠，5牛，6虎，7兔，8龙，9蛇，10马，11羊例如：XXX出生于1921年，即用1921年除以12，商得数为160，余数为1，对照上面得知余数1对应生肖是鸡，XXX就属鸡。=MID(猴鸡狗猪鼠牛虎兔龙蛇马羊,MOD(YEAR(A2),12)+1,1) （2007）如何求出一个人到某指定日期的周岁？=DATEDIF(起始日期,结束日期,Y)计算距离退休年龄的公式=IF(E2=,IF(E2=V2,已经退休,距离退休还有&DATEDIF(TODAY(),DATE(YEAR(U2)+(V2),MON
11、TH(U2),DAY(U2),Y)&年&DATEDIF(TODAY(),DATE(YEAR(U2)+(V2),MONTH(U2),DAY(U2),YM)&个月&DATEDIF(TODAY(),DATE(YEAR(U2)+(V2),MONTH(U2),DAY(U2),Md)&天)其中E2为年龄（可用身份证号码的公式生成）；V2为法定退休年龄（男60，女50）公式为：=IF(D2=,IF(D2=男,60,50)D2为男或女（可用身份证号码的公式生成）；U2为出生年月日（可用身份证号码的公式生成）。求工齡=DATEDIF(B2,TODAY(),y)=DATEDIF(B2,TODAY(),ym)=DA
12、TEDIF(B2,TODAY(),md)=DATEDIF(B2,TODAY(),y)&年&DATEDIF(B2,TODAY(),ym)&月&DATEDIF(B2,TODAY(),md)&日计算工龄=DATEDIF(C6,C8,y)求两日期间的年数=DATEDIF(C6,C8,ym)求两日期间除去整年数剩余的月数=DATEDIF(C6,C8,m)求两日期间的总月数如果只需要算出周年的话，可以用=datedif(1978-8,2006-5,Y)年龄及工龄计算有出生年月如何求年龄？有工作时间如何求工龄？（求出的结果为多少年另几个月，如：0303的形式，即3年零3个月）。a1是出生年月或工作时间：=d
13、atedif(a1,today(),y)=text(datedif(a1,today(),y),00)&text(datedif(a1,today(),m),00)如 B2=1964-9-1 则:=TEXT(DATEDIF(B2,TODAY(),y),00)&TEXT(MOD(DATEDIF(B2,TODAY(),m),12),00) 显示 4009=TEXT(DATEDIF(B2,TODAY(),y),00年)&TEXT(MOD(DATEDIF(B2,TODAY(),m),12),00月) 显示 40年09月如果你找不到 DATEDIF 函数，也可以不用 DATEDIF 函数,如 B2=19
14、64-9-1 则:=TEXT(RIGHT(YEAR(NOW()-B2),2),00)&TEXT(MOD(MONTH(NOW()-B2)-1,12),00) 显示 4009=TEXT(RIGHT(YEAR(NOW()-B2),2)&年&MOD(MONTH(NOW()-B2)-1,12)&个月,) 显示 40年09个月自动算出工龄日期格式为(yyyy.mm.dd)能否用：（yyyy.mm.dd）这种格式来计算出工龄有多长呢？ 以前用这样一段（ =TEXT(RIGHT(YEAR(NOW()-A1),2)&年&MOD(MONTH(NOW()-A1)-1,12)&个月,) ）。但这种方法只能用：（yyy
15、y-mm-dd）这样的日期格式才能实现！你不妨把“.”替换成“-”，不就行了吗，再说后者是日期的一种标准格式，=TEXT(RIGHT(YEAR(NOW()-SUBSTITUTE(A1,.,-),2)&年&MOD(MONTH(NOW()-SUBSTITUTE(A1,.,-)-1,12)&个月,)【时间和日期应用】自动显示当前日期公式=YEAR(NOW() 当前年=MONTH(NOW() 当前月=DAY(NOW() 当前日如何在单元格中自动填入当前日期Ctrl+;如何判断某日是否星期天=WEEKDAY(A2,2)=TEXT(A1,aaaa)=MOD(A1,7)1)显示昨天的日期每天需要单元格内显示
16、昨天的日期，但双休日除外。例如，今天是7月3号的话，就显示7月2号，如果是7月9号，就显示7月6号。=IF(TEXT(TODAY(),AAA)=一,TODAY()-3,IF(TEXT(TODAY(),AAA)=日,TODAY()-2,TODAY()-1)=IF(TEXT(TODAY(),AAA)=一,TODAY()-3,TODAY()-1)关于取日期怎么设个公式使A1在年月日向后推5年,变成2011-7-15=DATE(YEAR(A1)+5,MONTH(A1),DAY(A1)=EDATE(A1,12*5)如何对日期进行上、中、下旬区分=LOOKUP(DAY(A1),0,11,21,31,上旬,
17、中旬,下旬,下旬)如何获取一个月的最大天数=DAY(DATE(2002,3,1)-1)或=DAY(B1-1),B1为2001-03-01日期格式转换公式将 “01/12/2005” 转换成“20050112”格式RIGHT(A1,4)&MID(A1,4,2)&LEFT(A1,2)YEAR($A2)&TEXT(MONTH($A2),00)&TEXT(DAY($A2),00) 该公式不用设置数据有效性,但要设置储存格格式。也可以用下列两方法：1、先转换成文本, 然后再用字符处理函数。2、数据-分列 日期-MDY将“2005年9月”转换成“200509”格式先用公式：=text(a1,yyyymm)
18、+0 然后将单元格格式为常规。将“2005-8-6”格式转换为“20050806”格式用公式：=TEXT(A1,YYYYMMDD)反之，将20050806转为日期2005-8-6格式，可用公式：=DATE(LEFT(A1,4),MID(A1,5,2),RIGHT(A1,2)另四种公式：text(a1,0000-00-00) 显示：2005-08-06-TEXT(A1,#-00-00)，把单元格设置为日期格式 显示：2005-8-6TEXT(20050806,0000-00-00)*1，单元格设置日期型 显示：2005-8-6VALUE(LEFT(A1,4)&-&MID(A1,5,2)&-&RI
19、GHT(A1,2) 显示：2005-8-6将“20060501”转换为“2006-05-01”格式=DATE(LEFT(A2,4),MID(A2,5,2),RIGHT(A2,2)将“199306”转换为“1993-6”公式1：=LEFT(A3,4)&-&RIGHT(A3,2)*1公式2：=-TEXT(A3*100+1,#-00-00) 公式2需要设置单元格格式，自定义：e-m公式3：=TEXT(TEXT(A3&01,0000-00-00),e-m)把198405转换成1984.05一、查找1984，替换1984.二、如果全部是年月的话，我个人建议，1、采取辅助mid(xxxxxx,1,4) &
20、 . & right(xxxxxx,2)2、选中这列，用数据中的分列。然后三、单元格格式数字自定义，类型下面输入：#.#将文本“2004.01.02” 转换为日期格式：2004-1-2=DATE(MID(A1,1,4),MID(A1,6,2),MID(A1,9,2)将2005-8-6转换为2005年8月6日格式=TEXT(A1,yyyy年m月d日;)象22怎样转换成22日？转成当年当月的日子公式为：=date(year(now(),month(now(),22)将“2006年5月”转换成“2006年05月” 公式为：=TEXT(A8,yyyy年mm月;)也可以这样处理：选中单元格，设置单元格公
21、式数字自定义，将yyyy“年”m“月”改为：yyyy“年”mm“月”，即可。但这方法打印出来显示为：2006/5/将“1968年6月12日”转换为“1968/6/12”格式=YEAR(A1)&/&MONTH(A1)&/&DAY(A1) 显示：1968/6/12=TEXT(A1,yyyy/mm/dd) 显示：1968/06/12将“1968年6月12日”转换为“1968-6-12”格式=YEAR(A1)&-&MONTH(A1)&-&DAY(A1) 显示：1968-6-12=TEXT(A1,yyyy-mm-dd) 显示：1968-06-12将1993-12-28的日期格式转换成1993年12月=C
22、ONCATENATE(YEAR(A1),年,MONTH(A1),月)=YEAR(A1)&年&MONTH(A1)&月也可以自定义格式 $-404e年m月 将“1978-5-2”包含年月日的日期转换成“197805”只有年月的格式year(A1)&text(month(A1),00)要将“99.08.15” 格式转换成“1999.08.15”如何做选中列，数据菜单中选分列，分列过程中“格式”选“日期YMD”，结束。要保持2005/8/6格式当输入2005/8/6后系统自动变成2005-8-6，要保持2005/8/6格式，可以使用强制文本（前面加号）或使用公式=TEXT(A1,YYYY/MM/DD)
23、。也可以用另一种公式：=IF(ISERROR(TEXT(A1,yyyy/mm/dd),TEXT(A1,0000!/00!/00),TEXT(A1,yyyy/mm/dd)将“二三年十二月二十五日”转为“2003-12-25”格式，1、可以用数组公式将中文日期转化为日期系列数=14610+MATCH(SUBSTITUTE(A3,元,一),TEXT(ROW($14611:$55153),DBNum1yyyy年m月d日),0)该公式速度较慢。2、改进后的公式，速度要快的多：=DATE(1899+MATCH(LEFT(A7,4),TEXT(ROW($1900:$2100),DBNum10000),0),
24、MONTH(MATCH(SUBSTITUTE(MID(A7,6,7),元,一),TEXT(ROW($1:$366),DBNum1m月d日),0),DAY(MATCH(SUBSTITUTE(MID(A7,6,7),元,一),TEXT(ROW($1:$366),DBNum1m月d日),0)要设置为1900年的日期格式。日期格式转换如A列是月份数为8，B列是日期数为18，如何在C列显示“8月18日”=A1&月&B1&日反之，要将C列的“8月18日” 直接分别到D、E列，显示月份和日期，月数份=LEFT(C5,FIND(月,C5)-1)日期数=MID(C5,FIND(月,C5)+1,FIND(日,C5
25、)-FIND(月,C5)-1)也可分别用公式：=month(-c5)=day(-c5)日期格式转换问题输入的日期是:04-07-26. 与另一格的001合并,合并出来是:040726001.=TEXT(A1,YYMMDD)&001要想自动取得“编制日期：XXXX年X月X日”可在该单元格输入 =编制日期：&TEXT(TODAY(),yyyy年m月d日)【排名及排序筛选】一个具有11项汇总方式的函数SUBTOTAL=SUBTOTAL(9,$B$2:B2)在数据筛选求和上有意想不到的功能，11项功能为：1、求平均数，2、求计数，3、求计数值（自动筛选序列）4、求最大值，5、求最小值，6、求乘积，7、
26、求总体标准偏差，8、求标准偏差、9、求和，10、求方差，11、求总体方差。自动排序=SUBTOTAL(3,$B$2:B2)*1=IF(A2A1,1,N(C1)+1)按奇偶数排序我想请教怎样按奇数顺序然后再按偶数顺序排序=IF(MOD(A1,2),0,1)=IF(ROW()50,(ROW()*2)-100,(ROW()*2)-1)=ROW()*2-1-(ROW()50)*99自动生成序号比如在第二列中输入内容回车后第一列的下一行自动生成序列号。=IF(B2,A2+1,)如何自动标示A栏中的数字大小排序？=RANK(A1,$A$1:$A$5)=RANK(A1,A:A)如何设置自动排序A列自动变成从
27、小到大排列B=SMALL(A$2:A$28,ROW(1:1)A列自动变成从大到小排列B=LARGE(A$2:A$28,ROW(1:1)重复数据得到唯一的排位序列想得到数据的出现总数吗（1,2,2,3,4,4,5 数据的出现总数为5）？解答：不需要插列,不需要很多的函数就行了. =RANK(B3,B$3:B$12)+COUNTIF(B$3:B3,B3)-1按字符数量排序制作歌曲清单时，习惯按字符数量来排列分类，但是EXCEL并不能直接按字数排序。需要先计算出每首歌曲的字数，然后再进行排序。 如A、B列分别为“歌手”和“歌名”，在C1输入“字数”，在C2输入公式：LEN(B2) 下拖，单击C2，单击工具栏上的“升序排列”即可，删除C列。排序字母与数字的混合内容日常使用中，表格经常会有包含字母和数字混合的数据，对此类数据排序时，通常是先比较字母的大小，再比较数字的大小，但EXCEL是按照对字符进行逐位比较来排序的，如下表：A7排在第5位，而不是第1位。排序结果无法令人满意。 如果希望EXCEL改变排序的规则，需要将数据做一些改变。在B1中输入公式：LEFT(A1,1)& RIGHT(000& RIGHT(A1,LEN(A1)-1),3) 下拖单击B2，单击工具栏上的“升序排列”即可。
