Office中国论坛/Access中国论坛

标题: 请教（实现个人所得税计算的方法有哪些） [打印本页]

作者: lovecosco 时间: 2005-5-9 18:16
标题: 请教（实现个人所得税计算的方法有哪些）
不知道有没有类似的帖子过啊

请教谢谢

假设如下：基数/税率/扣除数

<COLGROUP>

<COL style="WIDTH: 41pt; mso-width-source: userset; mso-width-alt: 1728" width=54>

<COL style="WIDTH: 21pt; mso-width-source: userset; mso-width-alt: 896" width=28>

<COL style="WIDTH: 41pt; mso-width-source: userset; mso-width-alt: 1728" width=54>

<COL style="WIDTH: 45pt; mso-width-source: userset; mso-width-alt: 1920" span=2 width=60>

0

→

500

5%

0

500

→

2000

10%

25

2000

→

5000

15%

125

5000

→

20000

20%

375

20000

→

40000

25%

1375

40000

→

60000

30%

3375

60000

→

80000

35%

6375

80000

→

100000

40%

10375

100000

→

45%

15375

在表格中用公式自动取数，用多重if函数求怎么写啊，或者有其他更简洁的方法吗

谢谢

作者: 情比金坚 时间: 2005-5-10 03:59
自己编写一个函数（在模块里），直接调用即可。

作者: kicker1118 时间: 2005-5-11 20:28
上面的回答我不满意, 关键是怎么编这个函数啊???

if 好像最多只能套七次的啊!!!

作者: 老子 时间: 2005-5-13 22:49
利用VLOOKUP函数的近似匹配。

作者: dengyf 时间: 2005-5-14 23:53
可参考一下，数据不是很精确，但思路想来是对的。EXCEL输入时只要输入=gs(单元格)

Function gs(i)
  Select Case i
Case 0 To 500
   temp = 0
Case 500 To 2000
   temp = i * 0.1
Case 2000 To 5000
   temp = i * 0.15
Case 5000 To 20000
temp = i * 0.2
Case 20000 To 40000
temp = i * 0.25
Case 40000 To 60000
temp = i * 0.3
Case 60000 To 80000
temp = i * 0.35
Case 80000 To 100000
temp = i * 0.4
Case 100000 To 999999999
temp = i * 0.45
  End Select
  gs = temp
End Function

作者: yaokefeng 时间: 2005-7-15 19:32
利用VLOOKUP函数的近似匹配,复杂问题简单化，

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)