用Excel計(jì)算個(gè)人工資所得稅的四套方案

日期：2010-01-25　作者：孫亞　出處：天極軟件我來(lái)說(shuō)兩句(0)

　　一、個(gè)人工薪所得納稅相關(guān)背景知識(shí)

　　1、個(gè)人取得的工資、薪金所得，是指?jìng)€(gè)人因任職或者受雇而取得的工資、薪金、獎(jiǎng)金、年終加薪、勞動(dòng)分紅、津貼、補(bǔ)貼以及與任職或受雇有關(guān)的其他所得。

　　個(gè)人所得稅是對(duì)按稅法規(guī)定具有納稅義務(wù)的中國(guó)公民和外籍人員的個(gè)人收入或所得征收的一種稅。

　　2、工資、薪金所得項(xiàng)目稅率表：

表1

　　3、工資、薪金所得按以下步驟計(jì)算繳納個(gè)人所得稅：

　　每月取得工資收入后，先減去個(gè)人承擔(dān)的基本養(yǎng)老保險(xiǎn)金、醫(yī)療保險(xiǎn)金、失業(yè)保險(xiǎn)金，以及按省級(jí)政府規(guī)定標(biāo)準(zhǔn)繳納的住房公積金，再減去費(fèi)用扣除額 1600 元 / 月（來(lái)源于境外的所得以及外籍人員、華僑和香港、澳門、臺(tái)灣同胞在中國(guó)境內(nèi)的所得每月還可附加減除費(fèi)用 3200 元），為應(yīng)納稅所得額，按 5% 至 45% 的九級(jí)超額累進(jìn)稅率計(jì)算繳納個(gè)人所得稅。

　　計(jì)算公式是：應(yīng)納個(gè)人所得稅稅額 = 應(yīng)納稅所得額×適用稅率—速算扣除數(shù)

　　例：王某當(dāng)月取得工資收入 9000 元，當(dāng)月個(gè)人承擔(dān)住房公積金、基本養(yǎng)老保險(xiǎn)金、醫(yī)療保險(xiǎn)金、失業(yè)保險(xiǎn)金共計(jì) 1000 元，費(fèi)用扣除額為 1600 元，則王某當(dāng)月應(yīng)納稅所得額 =9000-1000-1600=6400 元。應(yīng)納個(gè)人所得稅稅額 =6400 × 20%-375=905 元。

　　4、個(gè)人取得工資、薪金所得應(yīng)繳納的個(gè)人所得稅，統(tǒng)一由支付人負(fù)責(zé)代扣代繳，支付人是稅法規(guī)定的扣繳義務(wù)人。

　　5、根據(jù)十屆全國(guó)人大常委會(huì)第十八次全體會(huì)議《關(guān)于修改〈中華人民共和國(guó)個(gè)人所得稅法〉的決定》，自 2006 年 1 月 1 日起 ，工薪所得個(gè)調(diào)稅起征點(diǎn)執(zhí)行中國(guó)公民 1600 元、外籍人士 4800 元的標(biāo)準(zhǔn)，計(jì)征方法仍執(zhí)行原定九級(jí)累進(jìn)方案（如表 1 所示）。

　二、工薪所得個(gè)調(diào)稅的 Excel 計(jì)算解決方案

表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),"")))))))

　　優(yōu)點(diǎn)：簡(jiǎn)單明了，上手容易

　　缺點(diǎn)：if() 函數(shù)嵌套最多只能七層，而個(gè)調(diào)稅計(jì)征采用的是九級(jí)累進(jìn)，所以這個(gè)公式適用的月收入上限是 6 萬(wàn)。

　　【方案二】——輔助數(shù)據(jù)版：

　　在 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),"")

　　優(yōu)點(diǎn)：克服 IF() 嵌套只能七層的缺陷，涵蓋整個(gè)累進(jìn)區(qū)間。累進(jìn)算法資料獨(dú)立，便于維護(hù)。公式也比較簡(jiǎn)潔，可讀性強(qiáng)。

　　缺點(diǎn)：需要借助于輔助列，可移植性不強(qiáng)。

　　【方案三】——數(shù)組公式版：

　　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),"")}

　　優(yōu)點(diǎn)：同樣克服了 IF 嵌套版不能涵蓋全部九級(jí)累進(jìn)區(qū)間的缺陷，且公式內(nèi)數(shù)據(jù)相對(duì)容易維護(hù)，整個(gè)公式維護(hù)起來(lái)也比較簡(jiǎn)單。

　　缺點(diǎn)：數(shù)組公式的操作方法比較獨(dú)特，每次修改后都要用“ Ctrl+Shift+Enter ”組合鍵加以識(shí)別，且可擴(kuò)展性不如在后臺(tái)運(yùn)行的 VBA 代碼。

　　P.S. ：

　　“數(shù)組公式：數(shù)組公式對(duì)一組或多組值執(zhí)行多重計(jì)算，并返回一個(gè)或多個(gè)結(jié)果。數(shù)組公式括于大括號(hào) ({ }) 中。按 Ctrl+Shift+Enter 可以輸入數(shù)組公式。”

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

　　“工具” -- 》“宏” -- 》“ Visual Basic 編輯器” -- 》“插入” -- 》“模塊”

　　============= 復(fù)制以下代碼至編輯窗口 ================

'計(jì)算個(gè)人收入調(diào)節(jié)稅 (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 '定義中國(guó)公民個(gè)稅起征點(diǎn)
ElseIf y = 1 Then
basicnum = 4800 '定義外國(guó)公民個(gè)稅起征點(diǎn)
Else: basicnum = Null
End If
downnum = Array(0, 500, 2000, 5000, 20000, 40000, 60000, 80000, 100000) '定義累進(jìn)區(qū)間下限
upnum = Array(500, 2000, 5000, 20000, 40000, 60000, 80000, 100000, 100000000) '定義累進(jìn)區(qū)間上限
ratenum = Array(0.05, 0.1, 0.15, 0.2, 0.25, 0.3, 0.35, 0.4, 0.45) '定義累進(jìn)稅率
deductnum = Array(0, 25, 125, 375, 1375, 3375, 6375, 10375, 15375) '定義累進(jìn)速算扣除數(shù)
If IsNumeric(x) = False Then
MsgBox ("請(qǐng)檢查計(jì)稅工資是否為數(shù)值！")
End If
If x < 0 Then
MsgBox ("計(jì)稅工資為負(fù)，重新輸入！")
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

　　============= 復(fù)制以上代碼至編輯窗口 ================

　　P.S. ：

　　1、iiatax(參數(shù)1,參數(shù) 2 ），參數(shù) 1 引用計(jì)稅工資，參數(shù) 2 用“ 0 ” 表示中國(guó)公民的所得稅起征點(diǎn)，用“ 1 ” 表示外國(guó)公民的起征點(diǎn)。

　　2、使用時(shí)可以像使用函數(shù)一樣，如“ B2=iiatax(A2,0) ”，或者“ B2=iiatax(6500,1) ”。