等级判断VBA

nnsea

Sub 等级判断()
'                If Sheet1.Range("b1") >= 90 Then
'                    Sheet1.Range("b2") = "优"
'                ElseIf Sheet1.Range("b1") >= 80 Then
'                    Sheet1.Range("b2") = "良"
'                ElseIf Sheet1.Range("b1") >= 70 Then
'                    Sheet1.Range("b2") = "中"
'                Else
'                    Sheet1.Range("b2") = "差"
'                End If
'            End Sub