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

hana

4年前

ステートメント

条件により処理内容を変更したい場合このステートメントを使います。

If　条件　Then

条件に一致した場合の処理

Else

条件に一致しなかった場合の処理

End　If

上記のExcelで希望のコース名を入力予約表を作成しました。

予約の確認メッセージが出るようにしました。

コース名 = Worksheets(1).Cells(6, 2).Value　※希望のコース名入力セル

If コース名 = “Ａコース” Then　※コース名がＡコースの時
MsgBox “ホテルのみのコースとなります。”　※条件に一致した場合の処理
Else
MsgBox “航空券とホテルがセットのコースとなります。”　※条件に一致しなかった場合の処理
End If

これを実行すると。

「ホテルのみのコースとなります。」のメッセージ。

条件が一致した場合の処理になります。

次に条件に一致しない値が入力された時の処理を実行します。

条件に一致しなかった時のメッセージが表示されました。