Excel2010如何用VBA创建一个计算个税按钮

1、打开Excel工作表，开放工具-插入-表单控件-选择按钮（窗体按钮），鼠标点击需要放置的位置，然后按着左键，缩放到适合的大少再松开鼠标键。这时会弹出一个指定宏的窗口，我们直接确认就好了。

2、这时按钮键就生成了，我们选择中间的名字重新命名。我们也可以右键选择个税计算的按钮键，再次调整大少和位置的。

3、用Alt+F11，进入VBA编辑环境，选择插入-模块，弹出模块编辑窗口。选择过程，输入个税计算，然后确认。显示如下图所示代码

4、在两行代码之间插入下面代码

Dim myvalue As Integer

myvalue = InputBox(" 请输入工资总额")

income = myvalue - 3500

If income <= 1500 Then

taxdue = income * 0.05 - 0

ElseIf income <= 4500 Then

taxdue = income * 0.1 - 105

ElseIf income <= 9000 Then

taxdue = income * 0.2 - 555

ElseIf income <= 35000 Then

taxdue = income * 0.25 - 1005

ElseIf income <= 55000 Then

taxdue = income * 0.3 - 2755

ElseIf income <= 80000 Then

taxdue = income * 0.35 - 5505

Else

taxdue = income * 0.45 - 13505

End If

MsgBox "你应缴纳个人所得税" & taxdue

5、这时我们可以选择“F5”,运行一下上述代码，我们输入4000后选择确认，就能计算出个税金额了。

6、我们在右键点击个税计算按钮-选择指定宏-点击个税计算-确认。这时我们就建成了一个个税计算按钮了。我单击按钮，输入数据就可以计算出个税多少出来了。