巧用ＥｘｃｅｌＶＢＡ解決工資薪金計(jì)稅問(wèn)題

　　【摘要】在個(gè)人所得稅計(jì)算的會(huì)計(jì)處理中，工資薪金所得稅的計(jì)算較為麻煩，依靠手工解決，效率較低；利用Excel的VBA功能，設(shè)計(jì)計(jì)稅函數(shù)，由計(jì)算機(jī)去自動(dòng)完成計(jì)稅任務(wù)，則是一件簡(jiǎn)單又高效的事情。
　　
　　一、工資薪金的納稅規(guī)定
　　
　　新修訂的《中華人民共和國(guó)個(gè)人所得稅法》將個(gè)人所得稅的減除費(fèi)用標(biāo)準(zhǔn)由800元提高到1600元，根據(jù)新修訂的《中華人民共和國(guó)個(gè)人所得稅法》和《中華人民共和國(guó)個(gè)人所得稅法實(shí)施條例》的具體規(guī)定，全面理解稅法的相關(guān)規(guī)定，這1600元并不是真正意義上的征收起點(diǎn)，真正意義上的征收起點(diǎn)還應(yīng)考慮免稅所得和稅前扣除項(xiàng)目。免稅所得包括：《中華人民共和國(guó)個(gè)人所得稅法》第四條第一款規(guī)定的“省級(jí)人民政府、國(guó)務(wù)院部委和中國(guó)人民解放軍軍以上單位，以及外國(guó)組織、國(guó)際組織頒發(fā)的科學(xué)、教育、技術(shù)、文化、衛(wèi)生、體育、環(huán)境保護(hù)等方面的獎(jiǎng)金”，第四條第三款規(guī)定的“按照國(guó)家統(tǒng)一規(guī)定發(fā)給的補(bǔ)貼、津貼”，第四條第四款規(guī)定的“福利費(fèi)、撫恤金、救濟(jì)金”，第四條第七款規(guī)定的“按照國(guó)家統(tǒng)一規(guī)定發(fā)給干部、職工的安家費(fèi)、退職費(fèi)、退休工資、離休工資、離休生活補(bǔ)助費(fèi)”。根據(jù)新修訂的《中華人民共和國(guó)個(gè)人所得稅法實(shí)施條例》第十三條的解釋?zhuān)瑐€(gè)人所得稅法第四條第三項(xiàng)所說(shuō)的“按照國(guó)家統(tǒng)一規(guī)定發(fā)給的補(bǔ)貼、津貼”，是指按照國(guó)務(wù)院規(guī)定發(fā)給的政府特殊津貼、院士津貼、資深院士津貼，以及國(guó)務(wù)院規(guī)定免納個(gè)人所得稅的其他補(bǔ)貼、津貼。根據(jù)新修訂的《中華人民共和國(guó)個(gè)人所得稅法實(shí)施條例》第十四條的解釋?zhuān)惙ǖ谒臈l第四款所說(shuō)的“福利費(fèi)”，是指根據(jù)國(guó)家有關(guān)規(guī)定，從企業(yè)、事業(yè)單位、國(guó)家機(jī)關(guān)、社會(huì)團(tuán)體提留的福利費(fèi)或者工會(huì)經(jīng)費(fèi)中支付給個(gè)人的生活補(bǔ)助費(fèi)；所說(shuō)的“救濟(jì)金”，是指國(guó)家民政部門(mén)支付給個(gè)人的生活困難補(bǔ)助費(fèi)。新修訂的《中華人民共和國(guó)個(gè)人所得稅法實(shí)施條例》第二十五條規(guī)定：按照國(guó)家規(guī)定，單位為個(gè)人繳付和個(gè)人繳付的基本養(yǎng)老保險(xiǎn)費(fèi)、基本醫(yī)療保險(xiǎn)費(fèi)、失業(yè)保險(xiǎn)費(fèi)、住房公積金，從納稅義務(wù)人的應(yīng)納稅所得額中扣除。在會(huì)計(jì)實(shí)務(wù)處理中，免稅所得和稅前扣除額，一般隨工資薪金一同計(jì)發(fā)。這樣，計(jì)算應(yīng)納稅所得額時(shí)，需要對(duì)工資薪金發(fā)放總額進(jìn)行相應(yīng)調(diào)整計(jì)算。
　　作為扣繳義務(wù)人的工資薪金支付單位，哪些人不需繳稅？哪些人需要繳稅？若要繳稅，應(yīng)繳納多少？由于還要考慮免稅所得、費(fèi)用減除標(biāo)準(zhǔn)和稅前扣除項(xiàng)目，這使得納稅計(jì)算變得繁雜起來(lái)。用手工解決，是一件比較麻煩的事情，交給計(jì)算機(jī)去完成，則是一件簡(jiǎn)單的事情。
　　應(yīng)納所得稅額=應(yīng)納稅所得額×適用稅率—速算扣除數(shù)
　　工資薪金應(yīng)納稅所得額=工資薪金總所得—免稅所得—稅前扣除—費(fèi)用減除標(biāo)準(zhǔn)
　　工資薪金總所得包括個(gè)人因任職或者受雇而取得的工資、薪金、獎(jiǎng)金、年終加薪、勞動(dòng)分紅、津貼、補(bǔ)貼以及與任職或者受雇有關(guān)的其他所得。
　　免稅所得是指按照規(guī)定發(fā)給的政府特殊津貼和按國(guó)家統(tǒng)一規(guī)定免納個(gè)人所得稅的津貼、補(bǔ)貼，以及根據(jù)規(guī)定從提留的福利費(fèi)或者工會(huì)經(jīng)費(fèi)中支付給個(gè)人的生活補(bǔ)助費(fèi)。
　　稅前扣除是指在規(guī)定標(biāo)準(zhǔn)范圍內(nèi)實(shí)際繳付的基本養(yǎng)老保險(xiǎn)費(fèi)、基本醫(yī)療保險(xiǎn)費(fèi)、失業(yè)保險(xiǎn)費(fèi)、住房公積金，這3費(fèi)1金在計(jì)算個(gè)人所得稅時(shí)允許在稅前扣除。
　　個(gè)人所得稅法規(guī)定的費(fèi)用減除標(biāo)準(zhǔn)為1600元/月，外籍人員另外附加減除費(fèi)用標(biāo)準(zhǔn)為3200元/月，也就是說(shuō)外籍人員減除費(fèi)用標(biāo)準(zhǔn)總數(shù)為4800元/月。
　　不屬于免稅范圍的各種工資、補(bǔ)貼、津貼、獎(jiǎng)金、勞動(dòng)分紅及與任職受雇相關(guān)的其他所得都應(yīng)進(jìn)行合并，扣除“費(fèi)用減除標(biāo)準(zhǔn)”后按工資薪金9級(jí)超額累進(jìn)稅率（見(jiàn)表1）繳稅。
　　
　　
　　二、設(shè)計(jì)計(jì)稅的自定義函數(shù)
　　
　　（一）啟動(dòng)Excel，新建一個(gè)工作簿，并命名為“工資扣稅計(jì)算.xls”。
　　（二）在“工資扣稅計(jì)算”工作簿的工作表窗口，單擊“工具”菜單，指向“宏”，再單擊“Visual Basic編輯器”。如果在“Microsoft Visual Basic-工資扣稅計(jì)算.xls”窗口中沒(méi)有出現(xiàn)“工程-VBAproject”窗口，則需單擊“視圖”—“工程資源管理器”菜單，或者按Ctrl+R，以使該窗口出現(xiàn)。
　　（三）單擊“插入”—“模塊”菜單，新建“模塊1”，在代碼窗口中輸入下列代碼：
　　Function tax（zsd As Single， mssd As Single， sqkc As Single， fyjc As Integer） As Single
　　Select Case zsd-mssd-sqkc-fyjc
　　Case Is>100000
　　tax=（zsd-mssd-sqkc-fyjc）×0.45-15375
　　Case Is>80000
　　tax=（zsd-mssd-sqkc-fyjc）×0.4-10375
　　Case Is>60000
　　tax=（zsd-mssd-sqkc-fyjc）×0.35-6375
　　Case Is>40000
　　tax=（zsd-mssd-sqkc-fyjc）×0.3-3375
　　Case Is>20000
　　tax=（zsd-mssd-sqkc-fyjc）×0.25-1375
　　Case Is>5000
　　tax=（zsd-mssd-sqkc-fyjc）×0.2-375
　　Case Is>2000
　　tax=（zsd-mssd-sqkc-fyjc）×0.15-125
　　Case Is>500
　　tax=（zsd-mssd-sqkc-fyjc）×0.1-25
　　Case Is>0
　　tax=（zsd-mssd-sqkc-fyjc）×0.05
　　Case Is≤0
　　tax=0
　　End Select
　　End Function
　　（四）單擊“視圖”—“對(duì)象瀏覽器”菜單，在“對(duì)象瀏覽器”窗口中最上邊的下拉列表框（缺省顯示為<所有庫(kù)>）中選擇“VBAProject”，在名為“類(lèi)”的窗口里選擇“模塊1”，右擊“‘模塊1’的成員”窗口中的tax，在彈出的快捷菜單中選擇“屬性”命令，出現(xiàn)“成員選項(xiàng)”對(duì)話框，在“描述”欄目框中錄入“返回工資薪金所得稅計(jì)算結(jié)果”。此描述與其他函數(shù)一樣將出現(xiàn)在調(diào)用函數(shù)時(shí)的說(shuō)明中。最后單擊“確定”按鈕。
　　（五）單擊“保存”按鈕，如果出現(xiàn)提示：“隱私問(wèn)題警告：此文檔中包含宏，……這些信息無(wú)法通過(guò)設(shè)置‘工具’菜單下‘選項(xiàng)’對(duì)話框‘安全性’選項(xiàng)卡中的‘保存時(shí)從文件中刪除個(gè)人信息’來(lái)刪除”，這時(shí)，先按“確定”按鈕關(guān)閉此提示，再按Alt+F11，切換到Excel主窗口，單擊“工具”—“選項(xiàng)”菜單，選擇“安全性”選項(xiàng)卡，將“個(gè)人信息選項(xiàng)”下的“保存時(shí)從此文件中刪除個(gè)人信息”前的勾選取消，單擊“確定”按鈕，最后單擊“保存”按鈕。
　　（六）為保證宏運(yùn)行，設(shè)置宏的安全性級(jí)別為“低”，操作方法是：在Excel主窗口，單擊“工具”，指向“宏”，單擊“安全性”，設(shè)置“安全級(jí)”為“低”后單擊“確定”按鈕。
　　（七）在Excel主窗口，單擊“文件”/“另存為”菜單，在“另存為”對(duì)話框中，先指定文件保存的位置，然后從“保存類(lèi)型”下拉列表框中選擇“Microsoft Excel 加載宏”（*.xla）一項(xiàng)，接著單擊“保存”按鈕，生成名為“工資扣稅計(jì)算.xla”的工作簿文件。
　　（八）在Excel主窗口，單擊“工具”/“加載宏”菜單，單擊“加載宏”對(duì)話框中的“瀏覽”按鈕，找出“工資扣稅計(jì)算.xla”并選定后單擊“確定”按鈕。
　　通過(guò)以上操作，工資薪金的計(jì)稅函數(shù)tax（zsd，mssd，sqkc，fyjc）的設(shè)計(jì)就大功告成，其中參數(shù)zsd的意義為工資薪金總所得，參數(shù)mssd的意義為免稅所得，參數(shù)sqkc的意義為稅前扣除，參數(shù)fyjc的意義為費(fèi)用減除標(biāo)準(zhǔn)。
　　
　　三、利用計(jì)稅函數(shù)計(jì)算工資薪金應(yīng)納稅額
　　
　　有了自定義函數(shù)Tax，工資薪金的計(jì)稅問(wèn)題也就迎刃而解。假如某單位工資表內(nèi)容如表2所示，表中“津補(bǔ)貼2”屬于免稅所得項(xiàng)目，“代扣3費(fèi)1金”屬于稅前扣除項(xiàng)目，費(fèi)用減除標(biāo)準(zhǔn)為1600元。
　　
　　（一）設(shè)計(jì)“應(yīng)發(fā)合計(jì)”的計(jì)算公式
　　確定第一個(gè)員工應(yīng)發(fā)合計(jì)的計(jì)算公式，J2單元公式為：=C2+D2+E2+F2+G2+H2+I2。然后利用自動(dòng)填充功能，即用鼠標(biāo)向下拖動(dòng)J2單元格右下角的填充柄，實(shí)現(xiàn)對(duì)其他所有員工應(yīng)稅所得計(jì)算公式的智能復(fù)制。
　　（二）設(shè)計(jì)“扣繳個(gè)稅”的計(jì)算公式
　　確定第一個(gè)員工的個(gè)稅計(jì)算公式，在M2單元格中錄入：=tax（J2，G2，K2，1600）。然后利用自動(dòng)填充功能，實(shí)現(xiàn)對(duì)其他所有員工個(gè)稅計(jì)算公式的智能復(fù)制。
　　（三）設(shè)計(jì)“實(shí)發(fā)合計(jì)”的計(jì)算公式
　　確定第一個(gè)員工實(shí)發(fā)合計(jì)的計(jì)算公式，在N2單元格中錄入：=J2-K2-L2-M2。利用自動(dòng)填充功能，實(shí)現(xiàn)對(duì)其他所有員工實(shí)發(fā)合計(jì)計(jì)算公式的智能復(fù)制。
　　定義好公式，“扣繳個(gè)稅”、“實(shí)發(fā)合計(jì)”欄自動(dòng)顯示結(jié)果，數(shù)據(jù)源變化，結(jié)果跟隨變化。