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

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

1

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

-07-12 10:39:46来源: 天极网

一、个人工薪所得纳税相关背景知识

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

个人所得税是对按税法规定具有纳税义务的中国公民和外籍

人员的个人收入或所得征收的一种税。

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

表1

2

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

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

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

例:王某当月取得工资收入 9000 元,当月个人承担住房公积

金、基本养老保险金、医疗保险金、失业保险金共计 1000 元,费用扣除额为 1600 元,则王某当月应纳税所得额 =9000-1000-1600=6 400 元。应纳个人所得税税额 =6400 × 20%-375=905 元。

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

5、根据十届全国人大常委会第十八次全体会议<关于修改

〈中华人民共和国个人所得税法〉的决定>,自年 1 月 1 日起 ,工薪所得个调税起征点执行中国公民 1600 元、外籍人士 4800 元的标准,计征方法仍执行原定九级累进方案(如表 1 所示)。

3

二、工薪所得个调税的 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-16 00)*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-33 75,2),"")))))))

优点:简单明了,上手容易

4

缺点:if() 函数嵌套最多只能七层,而个调税计征采用的是九级

累进,因此这个公式适用的月收入上限是 6 万。

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

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

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

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

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

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

-07-12 10:39:46来源: 天极网

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

B2: {=IF(A2<>"",ROUND(IF(AND(A2>0,A2<=1600),0,SUM(IF ((A2-1600>={0,500, ,5000, 0,40000,60000,80000,100000})+(A2-1600 <{500, ,5000, 0,40000,60000,80000,100000,})=2,(A2-1600)*{0.05,0.1,

5

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+S hift+Enter ”组合键加以识别,且可扩展性不如在后台运行的 VBA 代码。

P.S. :

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

能够输入数组公式。”

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

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

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

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

6

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, , 5000, 0, 40000, 60000, 80000, 10000 0) '定义累进区间下限

upnum = Array(500, , 5000, 0, 40000, 60000, 80000, 100000, ) '定义累进区间上限

ratenum = Array(0.05, 0.1, 0.15, 0.2, 0.25, 0.3, 0.35, 0.4, 0.45) '定义累进税率

7