Sub IIF函數應用（）
Cells（2, 3） = IIf（Cells（1, 2） >= 90, "優(yōu)秀", IIf（Cells（1, 2） >= 80, "良好", IIf（Cells（1, 2） >= 70, "中等", "較差"）））
End Sub
  學習達人
|
seeuswu
展開
|
 |
餅餅不吃餅干
展開
Public Sub chengji_level（）
Dim a As Integer, b As String
a = Sheet4.Range（"B1"）
If a >= 90 Then
b = "優(yōu)秀"
ElseIf a >= 80 And a < 90 Then
b = "良好"
ElseIf a >= 70 And a < 80 Then
b = "中等"
ElseIf a >= 60 And a < 70 Then
b = "較差"
Else
b = "不及格"
End If
Sheet4.Range（"B2 |
|
|
阿迪大師1
展開
|
 學習達人
|
T822721nq
展開
|
 學習達人
|
星空之痕
展開
|
  學習之星
|
尾號8355
展開
|
承擔因您的行為而導致的法律責任，
本站有權保留或刪除有爭議評論。
參與本評論即表明您已經閱讀并接受
上述條款。