勘察队员之歌:使用Excel表计算个税(3500元)

来源:百度文库 编辑:中财网 时间:2024/04/29 22:35:19

 

使用Excel表计算个税 

广大财务工作者在实际工作中,计算工资及代扣个税经常遇到,Excel巧妙使用,能帮助我们财务人员减少大量的重复劳动。

在实际工作中经常使用IF函数,用它来实现代扣个税是比较方便的,但由于个人所得税为七级超额累进税率,在IF函数中要进行七级嵌套,稍有不慎,就会改动公式,而且发生错误很难查找,应用十分不便,有没有更好的方法呢?通过实践,我觉得采用自定义函数的方法来实现个税计算非常好,具体步骤如下:

1、新建Excel工作表,按Alt+F11,打开Microsoft Visual Basic编辑器;

2、按Ctrl+R,打开工程资源管理器,打开Microsoft Excel对象,双击对象Sheet1(Sheet1);

3、点击菜单中“插入-模块”;

4、复制粘贴以下代码:

Option Explicit

Public Function sds(gz As Currency) As Currency

' 根据工资计算个税

    If gz > 80000 Then

       sds = gz * 0.45 - 13505

         Else

         If gz > 55000 And gz <= 80000 Then

            sds = gz * 0.35 - 5505

             Else

             If gz > 35000 And gz <= 55000 Then

              sds = gz * 0.3 - 2755

               Else

              If gz > 9000 And gz <= 35000 Then

                sds = gz * 0.25 - 1005

                Else

                If gz > 4500 And gz <= 9000 Then

                  sds = gz * 0.2 - 555

                  Else

                  If gz > 1500 And gz <= 4500 Then

                     sds = gz * 0.1 - 105

                      Else

                      If gz > 0 And gz <= 1500 Then

                        sds = gz * 0.03

                        Else

                        sds = 0

                      End If

                  End If

                End If

              End If

             End If

         End If

    End If

End Function

5、保存文件后退出Microsoft Visual Basic编辑器;

6、在Excel工作表中,如计算个税,则在计税一栏,插入自定义函数sds()即可。比如:单元格A1本月工资为6500,单元格B1各种保险应扣1100,单元格C1应扣税:=sds(A1- B1-3500),计算显示:单元格C1=85元。