本文为:《别怕,Excel VBA其实很简单(第3版)》随书问题参考答案

要解决本例的问题,可以使用下面的过程:

Sub 为成绩评定等次()
If Range("B2").Value >= 0 Then
If Range("B2").Value = 90 Then
Range("C2").Value = "优秀"
Else
If Range("B2").Value >= 80 Then
Range("C2").Value = "良好"
Else
If Range("B2").Value >= 60 Then
Range("C2").Value = "及格"
Else
Range("C2").Value = "不及格"
End If
End If
End If
Else
Range("C2").Value = "非法数据"
End If
Else
Range("C2").Value = "非法数据"
End If
End Sub

声明:本站所有文章均出自互联网,只为学习之用;如若本站内容侵犯了原著者的合法权益,可联系我们进行处理。