资源描述：
《自定义函数实例剖析》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。
1、自定义函数实例剖析下面我们通过两个典型实例，学习自定义函数使用的全过程。这里实际上假设读者朋友都冇一定的VBA基础。假如你完全没有VBA基础也不耍紧，当学习完实例厉，若觉得自定义函数在自己以厉的工作中可能用到，那么再去补充相应的VBA基础也不迟。(-)计算个人调节税的自定义函数任务假设个人调节税的收缴标准是：工资小于等于800元的免征调节税，工资800元以上至1500元的超过部分按5%的税率征收，1500元以上至2000元的超过部分按8%的税率征收，高丁2000元的超过部分按20%的税率征收。分析假设Shee
2、ts工作表的A、B、C、D列中分别存放“姓名”、“总工资”、“调节税”、“税后工资”字段数据,如图1所示。1234567耒名勇梅莉佳洁红姓王李钟刘朱罗总工资调节税¥750.00¥1,250.00¥1,750.00¥2,250.00¥3,000.00¥1,300.00税后工资图1平时使用较多的方法是借助嵌套使用IF函数计算，比如在C2单元格输入公式H=IF(B2<=800,0,IF(B2<=1500,(B2-800)*0.05,IF(B2<=2000,700*0.05+(B2-1500)*0.08,700*0.
3、05+500*0.08+(B2・2000广0.2)))”，然后通过填充柄复制公式到C列的其余单元格。既然公式能够解决问题，为什么还要使用自定义两数的方法呢？正如前而提到的两个方面的原因：一是公式看起來A繁琐，不便于理解和管理；二是公式的处理能力在而对稍微复杂一些的问题时便失去效用，比如假设调节税的税率标准会根据年龄的不同而改变，那么公式可能就无能为力了。使用自定义函数下面就通过此例介绍使用自定义两数的全过程，即使是初学Excel的朋友，也会感觉其操作实际上是非常简单的。1.为了便于测试自定义函数的计算效果，可
4、以先把上而采用公式计算的结果删去。然厉选择菜单“工具宏-VisualBasic编辑器”命令(或按下键盘AIRF11组合键)，打开VisualBasic窗口，我们将在这里口定义函数。2.进入VisualBasic口后，选择菜单“插入->模块”命令，于是得到“模块T,在其小输入如下自定义两数的代码(图2)：FunctionTAX(salary)Constr1AsDouble=0.05Constr2AsDouble=0.08Constr3AsDouble=0.2SelectCasesalaryCaseIs<=800
5、TAX=0CaseIs<=1500TAX=(salary・800)*r1CaseIs<=2000TAX=(1500・800)*r1+(salary-1500)*r2CaseIs>2000TAX=(1500・800)*r1+(2000・1500)*r2+(salary・2000)*r3EndSelectEndFunctionC21234567¥55.00¥125.00¥275.00¥25.001.函数I'l定义完成后，选择菜单“文件-＞关闭并返回到MicrosoftExcel"命令，返回到ExcelT作表窗口，
6、在C2单元格中输入公式“=TAX（B2）”回车后就计算岀了第一个员工应付的个人调节税，然后用公式填充柄复制公式到其它后面的单元格，这样就利用自定义函数完成了个人调节税的计算（图3）。&=tax(B2)总工资誉邀一_税后工资¥750.ool¥o.ool¥1,250.00¥22.50¥1,750.00¥z250.00¥3,000.00¥1,300.00图32.从H定义函数的代码中可以看出，用这种方式，h定义两数的功能非常易于理解，同时如果税率改变，相应地变化"、r2、r3的值即可。通常，口定义的函数只能在当前工作
7、薄使用，如果该函数需要在其它工作薄中使用，则选择菜单“文件-另存为"命令，打开“另存为”对话框，选择保存类型为“MircosoftExcel加载宏”，然后输入一个文件名，如“TAX”单击“确定”后文件就被保存为加载宏（图4）。然后选择菜单“工具-加载宏”命令，打开“加载宏”对话框，勾选“叮用加载宏”列表框屮的Tax”复选框即皿单击“确定”按钮后（图5）,就町以在本机上的所有工作薄屮使用该自定义函数了。图4图5如果想要在其它机器上使用该H定义两数，只要把上面的加载宏文件复制到其它电脑上加载宏的默认保存位置即可。
8、说明：WindowsXP系统下加载宏文件的默认保存位置为：C:DocumentsandSettingszunyue(用户帐户ApplicationDataMicrosoftAddlns文件夹。(二)计算奖金的自定义函数任务为了促进销售人员的工作积极性，销售部门经理制定了销售业绩奖金制度，奖金发放的标准奖金率如下：月销佔:额小于等于2800元的奖金率为4%,月销售额为2800元至7900元的奖
