本节课主要讲解语法篇的第一篇,IF函数的当中的IF语句单一条件判断和多条件判断的使用细节。
一、IF语句单一条件判断:
假设:如图第二部分,当 I3>=90时,J3为通过,反之为不通过。
代码如下:
Sub IF单一条件判断()
If Sheet1.Range("I3") >= 90 Then
Sheet1.Range("j3") = "通过"
Else
Sheet1.Range("j3") = "不通过"
End If
End Sub
一、IF语句多条件判断:
假设:如图第一部分,当 B3>=90时,C3为良好;当 B3>=80时,C3为合格,反之为不合格。
代码如下:
Sub IF多条件判断()
If Sheet1.Range("B3") >= 90 Then
Sheet1.Range("C3") = "优秀"
ElseIf Sheet1.Range("B3") >= 80 Then
Sheet1.Range("C3") = "合格"
Else
Sheet1.Range("C3") = "不合格"
End If
End Sub
三、IF语句总结:
1.单行形式1(If...Then)
1.1 If 条件判断 Then 条件成立结果;
1.2 在单行形式中,按照 If...Then 判断的结果也可以执行多条语句;
1.3所有语句必须在同一行上并且以冒号分开。
如:
Sub test()
If 1 > 10 Then a = 1: b = 2: c = 3
End Sub
2. 单行形式2
If 条件判断 Then 条件成立 Else 条件不成立。
如:
Sub test2()
If 1 > 1 Then MsgBox "yes" Else MsgBox "no"
End Sub
3.块形式(If...Then…End)
If 条件判断 Then
条件成立结果
End If
如:
Sub test3()
If 11 > 10 Then
a = 1 + a
b = 1 + a
c = 1 + b
End If
End Sub
4.块形式的If嵌套
If 条件判断 Then
成立时的结果
ElseIf 条件判断 Then
成立时的结果
……
Else
不成立时的结果
End If
如:
Sub IF多条件判断()
If Sheet1.Range("B3") >= 90 Then
Sheet1.Range("C3") = "优秀"
ElseIf Sheet1.Range("B3") >= 80 Then
Sheet1.Range("C3") = "合格"
Else
Sheet1.Range("C3") = "不合格"
End If
End Sub