Excel VBA系列:实现奖金比例计算+4种公式法
2018-03-08 16:41
615 查看
作业要求:根据奖金规则,计算每位员工的奖励比例及销售奖金
奖金规则:
第一类方法:Excel公式法
方法1:=HLOOKUP(C3,'练习6-奖金规则'!$C$3:$F$4,2,TRUE)
方法2:=IF(C3>=20000,8%,IF(C3>=10000,6%,IF(C3>=5000,4%,2%)))
方法3:=INDEX('练习6-奖金规则'!$C$3:$F$4,2,MATCH('练习6-index+match'!C3,'练习6-奖金规则'!$C$3:$F$3,1))
方法4:奖金规则转置后,=VLOOKUP(C3,'练习6-奖金规则'!$C$6:$D$9,2,TRUE)
第二类方法:Excel VBASub bonus()
Dim ratio As Single
For i = 3 To 22 Step 1
Select Case Cells(i, "C")
Case 0 To 5000
ratio = 0.02
Case 5001 To 10000
ratio = 0.04
Case 10001 To 20000
ratio = 0.06
Case Else
ratio = 0.08
End Select
Cells(i, "D") = ratio
Next i
End Sub
奖金规则:
第一类方法:Excel公式法
方法1:=HLOOKUP(C3,'练习6-奖金规则'!$C$3:$F$4,2,TRUE)
方法2:=IF(C3>=20000,8%,IF(C3>=10000,6%,IF(C3>=5000,4%,2%)))
方法3:=INDEX('练习6-奖金规则'!$C$3:$F$4,2,MATCH('练习6-index+match'!C3,'练习6-奖金规则'!$C$3:$F$3,1))
方法4:奖金规则转置后,=VLOOKUP(C3,'练习6-奖金规则'!$C$6:$D$9,2,TRUE)
第二类方法:Excel VBASub bonus()
Dim ratio As Single
For i = 3 To 22 Step 1
Select Case Cells(i, "C")
Case 0 To 5000
ratio = 0.02
Case 5001 To 10000
ratio = 0.04
Case 10001 To 20000
ratio = 0.06
Case Else
ratio = 0.08
End Select
Cells(i, "D") = ratio
Next i
End Sub
相关文章推荐
- c++实现18位身份证校验码的计算公式(转载)
- c#中利用google map距离计算公式实现两点间距离的计算
- C++基于蔡基姆拉尔森计算公式实现由年月日确定周几的方法示例
- php中通过eval实现字符串格式的计算公式
- STL系列之七 快速计算x的n次幂 power()的实现
- JAVA实现的可以带参数的公式表达式计算
- 【Java数据结构的实现】之系列三栈的实现(使用栈计算后缀表达式)
- 实现Excel行插入行删除特殊处理,单元格合并及动态条件单元格公式自动计算功能的VBA 宏示例
- JavaScript实现计算复杂计算公式(支持括号)
- 公式解析和计算的实现
- 计算几何常用公式与技巧归纳之系列一:点与线
- [转]用Objective-C实现简单的数学字符串公式的计算
- MVEL实现java直接根据公式计算结果
- Octopus系列之价格计算公式
- 《数据手袋》将实现复杂计算公式。
- 【实时计算架构系列1】WePay如何基于谷歌云平台(GCP)和kafka实现实时流式欺诈检测
- STL系列之七 快速计算x的n次幂 power()的实现
- 巧用动态即时编译实现公式的定义与计算
- EXCEL VBA 公式计算问题小结
- 用python实现计算1-2*((60-30+(-40/5)*(9-2*5/3+7/3*99/4*2998+10*568/14))-(-4*3)/(16-3*2))类似的公式计算