如何在EXCEL自定义函数是写多个选择性条件

来源:百度知道 编辑:UC知道 时间:2024/05/29 18:53:21
如:A1在0-60之间,B1是及格,在60-80之间,B1是良好,在80-100之间 B1是优秀。我知道用IF函数可以直接写, 但我想知道如何用自定义函数来表达这个条件。

新建模块,再新建过程,选函数,在其中写入代码:
Public Function Ch(x As Range)
If x > 0 And x <= 60 Then
Ch = "及格"
ElseIf x > 60 And x <= 80 Then
Ch = "良好"
ElseIf x > 80 And x <= 100 Then
Ch = "优秀"
Else
Ch = "未定义"
End If
End Function

在B1中输入=LOOKUP(A1,{0,60,80,100},{"差","及格","良好","优"}),

向下填充复制即可知道A列中的数据是差&及格&良好&优。

祝你明白成功为盼!

也是判断吧。看看VBA中关于选择的语句