勘察队员之歌:使用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元。