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

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

上一篇：表格制作快速入门：Range对象的Select方法和Activate方法的区别 下一篇：excel函数教程：用VBA合并多表数据时，合并区域列数不定怎么办

郑重声明：本文版权归原作者所有，转载文章仅为传播更多信息之目的，如作者信息标记有误，请第一时间联系我们修改或删除，多谢。