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

　　1、个人取得的工资、薪金所得，是指个人因任职或者受雇而取得的工资、薪金、奖金、年终加薪、劳动分红、津贴、补贴以及与任职或受雇有关的其他所得。

　　个人所得税是对按税法规定具有纳税义务的中国公民和外籍人员的个人收入或所得征收的一种税。

　　2、工资、薪金所得项目税率表：

表1

　　3、工资、薪金所得按以下步骤计算缴纳个人所得税：

　　每月取得工资收入后，先减去个人承担的基本养老保险金、医疗保险金、失业保险金，以及按省级政府规定标准缴纳的住房公积金，再减去费用扣除额 1600 元 / 月（来源于境外的所得以及外籍人员、华侨和香港、澳门、台湾同胞在中国境内的所得每月还可附加减除费用 3200 元），为应纳税所得额，按 5% 至 45% 的九级超额累进税率计算缴纳个人所得税。

　　计算公式是：应纳个人所得税税额 = 应纳税所得额×适用税率—速算扣除数

　　例：王某当月取得工资收入 9000 元，当月个人承担住房公积金、基本养老保险金、医疗保险金、失业保险金共计 1000 元，费用扣除额为 1600 元，则王某当月应纳税所得额 =9000-1000-1600=6400 元。应纳个人所得税税额 =6400 × 20%-375=905 元。

　　4、个人取得工资、薪金所得应缴纳的个人所得税，统一由支付人负责代扣代缴，支付人是税法规定的扣缴义务人。

　　5、根据十届全国人大常委会第十八次全体会议《关于修改〈中华人民共和国个人所得税法〉的决定》，自 2006 年 1 月 1 日起 ，工薪所得个调税起征点执行中国公民 1600 元、外籍人士 4800 元的标准，计征方法仍执行原定九级累进方案（如表 1 所示）。

二、工薪所得个调税的 Excel 计算解决方案

表2

　　C2 =IF(A2<>"",A2-B2,"")

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

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

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

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

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

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

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

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

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

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

　　B2: {=IF(A2<>"",ROUND(IF(AND(A2>0,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 Variant, upnum As Variant, ratenum As Variant, deductnum As Variant
If y = 0 Then
basicnum = 1600 '定义中国公民个税起征点
ElseIf y = 1 Then
basicnum = 4800 '定义外国公民个税起征点
Else: basicnum = Null
End If
downnum = Array(0, 500, 2000, 5000, 20000, 40000, 60000, 80000, 100000) '定义累进区间下限
upnum = Array(500, 2000, 5000, 20000, 40000, 60000, 80000, 100000, 100000000) '定义累进区间上限
ratenum = Array(0.05, 0.1, 0.15, 0.2, 0.25, 0.3, 0.35, 0.4, 0.45) '定义累进税率
deductnum = Array(0, 25, 125, 375, 1375, 3375, 6375, 10375, 15375) '定义累进速算扣除数
If IsNumeric(x) = False Then
MsgBox ("请检查计税工资是否为数值！")
End If
If x < 0 Then
MsgBox ("计税工资为负，重新输入！")
End If
If x >= 0 And x < basicnum Then
iiatax = 0
End If
For i = 0 To UBound(downnum)
If x - basicnum > downnum(i) And x - basicnum <= upnum(i) Then
iiatax = Round( ( x - basicnum ) * ratenum(i) - deductnum(i), 2)
End If
Next i
End Function

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

　　P.S. ：

　　1、iiatax(参数1,参数 2 ），参数 1 引用计税工资，参数 2 用“ 0 ” 表示中国公民的所得税起征点，用“ 1 ” 表示外国公民的起征点。

　　2、使用时可以像使用函数一样，如“ B2=iiatax(A2,0) ”，或者“ B2=iiatax(6500,1) ”。