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

用Excel计算个人所得税的四套方案
　2006-07-12 10:39:46　来源: 天极网　　

一、个人工薪所得纳税相关背景知识
1、个人取得的工资、薪金所得，是指个人因任职或者受雇而取得的工资、薪金、奖金、年终加薪、劳动分红、津贴、补贴以及与任职或受雇有关的其他所得。
个人所得税是对按税法规定具有纳税义务的中国公民和外籍人员的个人收入或所得征收的一种税。
2、工资、薪金所得项目税率表：
级数
全月应纳税所得额
税率 (%)
速算扣除数 ( 元 )
1
不超过 500 元的部分
5
0
2
超过 500 元至 2000 元的部分
10
25
3
超过 2000 元至 5000 元的部分
15
125
4
超过 5000 元至 20000 元的部分
20
375
5
超过 20000 元至 40000 元的部分
25
1375
6
超过 40000 元至 60000 元的部分
30
3375
7
超过 60000 元至 80000 元的部分
35
6375
8
超过 80000 元至 100000 元的部分
40
10375
9
超过 100000 元的部分
45
15375
表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 计算解决方案

A
B
C
D
E
F
G
H
I
1
计税工资
应纳税额
税后工资

1000
0
1000

10000
1305
8695

100000
28985
71015

级数
累进区间
下限
税率
扣除数
2
1
<500
0
5%
0
3
2
500-2000
500
10%
25
4
3
2000-5000
2000
15%
125
5
4
5000-20000
5000
20%
375
6
5
20000-40000
20000
25%
1375
7
6
40000-60000
40000
30%
3375
8
7
60000-80000
60000
35%
6375
9
8
80000-100000
80000
40%
10375
10
9
>100000
100000
45%
15375
表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() 嵌套只能七层的缺陷，涵盖整个累进区间。累进算法资料独立，便于维护。公式也比较简洁，可读性强。
缺点：需要借助于辅助列，可移植性不强。
用Excel计算个人所得税的四套方案
　2006-07-12 10:39:46　来源: 天极网　　
【方案三】——数组公式版：
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) ”。