用Excel计算个人所得税的四套方案

【 tulaoshi.com - 办公软件 】

　　C2 =IF(A2<"",A2-B2,"") [next]

【方案一】—— IF 嵌套版：

　　B2 =IF(AND(A20,A2<=1600),0,IF(AND(A21600,A2<=2100),ROUND((A2-1600)*0.05,2),IF(AND(A22100,A2<=3600),ROUND((A2-1600)*0.1-25,2),IF(AND(A23600,A2<=6600),ROUND((A2-1600)*0.15-125,2),IF(AND(A26600,A2<=21600),ROUND((A2-1600)*0.2-375,2),IF(AND(A221600,A2<=41600),ROUND((A2-1600)*0.25-1375,2),IF(AND(A241600,A2<=61600),ROUND((A2-1600)*0.3-3375,2),"")))))))

　　优点：简单明了，上手容易

　　缺点：if() 函数嵌套最多只能七层，而个调税计征采用的是九级累进，所以这个公式适用的月收入上限是 6 万。

　　【方案二】——辅助数据版：

　　在 E、F、G、H、I 五列插入辅助列(如表 2 所示)。

　　B2 =IF(A2<"",ROUND(IF(A21600,A2-1600,0)*VLOOKUP(VLOOKUP(IF(A21600,A2-1600,0),$G$2:$G$10,1),$G$2:$I$10,2)-VLOOKUP(VLOOKUP(IF(A21600,A2-1600,0),$G$2:$G$10,1),$G$2:$I$10,3),2),"")

　　优点：克服 IF() 嵌套只能七层的缺陷，涵盖整个累进区间。累进算法资料独立，便于维护。公式也比较简洁，可读性强。

　　缺点：需要借助于辅助列，可移植性不强。

　　【方案三】——数组公式版：

　　B2: {=IF(A2<"",ROUND(IF(AND(A20,A2<=1600),0,SUM(IF((A2-1600={0,500,2000,5000,20000,40000,60000,80000,100000})+(A2-1600<{500,2000,5000,20000,40000,60000,80000,100000,100000000000})=2,(A2-1600)*{0.05,0.1,0.15,0.2,0.25,0.3,0.35,0.4,0.45}-{0,25,125,375,1375,3375,6375,10375,15375},0))),2),"")}

　　优点：同样克服了 IF 嵌套版不能涵盖全部九级累进区间的缺陷，且公式内数据相对容易维护，整个公式维护起来也比较简单。

　　缺点：数组公式的操作方法比较独特，每次修改后都要用“ Ctrl+Shift+Enter ”组合键加以识别，且可扩展性不如在后台运行的 VBA 代码。

　　P.S. ：

　　“数组公式：数组公式对一组或多组值执行多重计算，并返回一个或多个结果。数组公式括于大括号 ({ }) 中。按 Ctrl+Shift+Enter 可以输入数组公式。”

　　【方案四】—— VBA 代码版：

　　“工具” -- 》“宏” -- 》“ Visual Basic 编辑器” -- 》“插入” -- 》“模块”

　　============= 复制以下代码至编辑窗口 ================

　　'计算个人收入调节税 (Individual Income Adjustment Tax)

　　Function iiatax(x,y)

　　Dim basicnum As Integer

　　Dim downnum As Var