17.Excel vba开发-根据分数判断等级

最新推荐文章于 2023-09-22 12:04:35 发布

牛code

最新推荐文章于 2023-09-22 12:04:35 发布

阅读量777

点赞数

分类专栏： excel vba开发

本文链接：https://blog.csdn.net/qq_25064691/article/details/126137531

版权

VBA Excel 等级判断分数管理自动化

关键词由CSDN通过智能技术生成

excel vba开发专栏收录该内容

18 篇文章

订阅专栏

1.需求：根据分数判断等级

2.代码：

Sub 等级判断()
    Dim i As Integer
    For i = 1 To Range("A1").CurrentRegion.Rows.Count
        If Range("A" & i).Value >= 90 Then
            Range("B" & i).Value = "优秀"
        Else
            If Range("A" & i).Value >= 60 Then
                Range("B" & i).Value = "及格"
            Else
                Range("B" & i).Value = "不及格"
            End If
        End If
    Next i
End Sub