读keisi 哦
  学习达人
|
qq554963044
展开
|
 学习达人
|
T884829qc
展开
如果分数是小数呢，比如89.5 79.5 59.5  sj18018777130
展开
@ T884829qc Sub 判断分数（）
Dim i As Long
i = 2
Do Until Range（"B" & i）.Value = ""
Select Case Range（"B" & i）.Value
Case 90 To 100
Range（"C" & i）.Value = "优"
Case 80 To 90
Range（"C" & i）.Value = "良"
Case 60 To 80
Range（"C" & i）.Value = "中"
Case 0 To 60
Range（"C" & i）.Value = "差"
Case El |
承担因您的行为而导致的法律责任，
本站有权保留或删除有争议评论。
参与本评论即表明您已经阅读并接受
上述条款。