If condition Then
' 如果条件为真时执行的代码块
Else
' 如果条件为假时执行的代码块
End If
- condition 是一个逻辑表达式，如果为真，则执行 If 后面的代码块；否则，执行 Else 后面的代码块。
以下是一个简单的例子：
Sub ExampleIfThenElse()
Dim x As Integer
x = 10
If x > 5 Then
MsgBox "x 大于 5。"
Else
MsgBox "x 不大于 5。"
End If
End Sub
在这个例子中，如果 x 大于 5，则显示 "x 大于 5。" 的消息框；否则，显示 "x 不大于 5。" 的消息框。
你还可以使用多个 ElseIf 部分，来处理更多的条件情况。例如：
Sub ExampleIfThenElseIf()
Dim x As Integer
x = 10
If x > 10 Then
MsgBox "x 大于 10。"
ElseIf x = 10 Then
MsgBox "x 等于 10。"
Else
MsgBox "x 小于 10。"
End If
End Sub
在这个例子中，根据 x 的值，会显示不同的消息框。
注意：当你只需要执行两个分支中的一个时，Select Case 语句可能是更清晰的选择，尤其是当条件多于两个时。
转载请注明出处：http://www.zyzy.cn/article/detail/290/VBA