If...Then...Else

---

If...Then...Elseステートメント

構文

If condition Then [statements][Else elsestatements]

conditionには、条件を評価する数式または文字列式を指定します。

statementsには、条件が真だった場合に実行するステートメントを指定します。

elsestatementsには、条件が偽だった場合に実行するステートメントを指定します。

次のように、ブロック形式で記述することもできます。

If condition Then

[statements]

[ElseIf condition-n Then

[elseifstatements] ...

[Else

[elsestatements]]

End If

解説

条件を評価して、条件付きの実行を行うステートメントです。

サンプル

次の例は、条件を評価して実行します。

Sub Sample()
    Dim a As Integer
    a = InputBox("数値を入力してください")
    If a = 10 Then MsgBox "10です" Else MsgBox "10ではありません"
    If a < 5 Then
        MsgBox a & "は５より小さい"
    ElseIf a = 5 Then
        MsgBox a & "は５です"
    Else
        MsgBox a & "は５より大きい"
    End If
End Sub