个人所得税的计算看起来比较复杂，似乎不用VBA宏编程而只用公式来计算是一件不可能的事。其实，Excel提供的函数公式不但可以计算个人所得税，而且还有很大的灵活：可以随意改变不扣税基数，随意改变各扣税分段界限值及其扣税税率（说不定以后调整个人所得税时就可以用到。）
不管是编程还是使用公式，都得将个人所得税的方法转化为数学公式，并且最好将这个公式化简，为以后工作减少困难。以X代表你的应缴税（减去免税基数）的工薪收入（这里的个人所得税仅以工薪为例），Tax代表应缴所得税，那么：
当500＜X≤2000则TAX=（X-500）*10+500*5 =>TAX=X*10-25
当2000＜X≤5000则TAX=（X-2000）*15+2000*10 =>TAX=X*15-125
．．．．．．
依此类推，通用公式为：个人所得税=应缴税工薪收入*该范围税率-扣除数
在此,扣除数=应缴税工薪收入上一范围上限*该范围税率-上一范围扣除数
其实只有四个公式，即绿色背景处。黄色背景处则为计算时输入数据的地方。各处公式设置即说明如下：
E3：=C3*D3-C3*D2+E2
E4-E10：根据E3填充得到，或者拷贝E3粘贴得到
C15：=IF(B15>$B$12,B15-$B$12,0)如果所得工薪大于不扣税基数，则应纳税工薪为工薪减去为零不扣税基数，否则，应纳税工薪零。
D15：=VLOOKUP(C15,$C$2:$C$10,1)查阅应纳税工薪属于哪个扣税范围。
E15：=C15*VLOOKUP(D15,$C$2:$E$10,2)-VLOOKUP(D15,$C$2:$E$10,3)查阅该扣税范围扣税税率和应减的扣除数。这里主要用到VLOOKUP函数，可查阅帮助获取更多信息。
C15，D15的公式可以合并到E15中，那样可读性会差很多，但表格会清晰一些。合并后公式：=IF(B15>$B$12,B15-$B$12,0)*VLOOKUP(VLOOKUP(IF(B15>$B$12,B15-$B$12,0),$C$2:$C$10,1),$C$2:$E$10,2)-VLOOKUP(VLOOKUP(IF(B15>$B$12,B15-$B$12,0),$C$2:$C$10,1),$C$2:$E$10,3)实际上是将公式中出现的C15，D15用其公式替代即可。
|
打印本页
发E-mail推荐给朋友