説明１－３ If ～ Then
操作
[セルのチェック]ボタンをクリックしましょう。
セル[B10]が空白時のみ、次のダイアログボックスが表示され、値(数値・文字列等)を入れた場合は表示されません。
プロシージャ「説明用13_セルのチェック」の内容
[セルのチェック]ボタンのプロシージャを表示しましょう。
- Sub 説明用13_セルのチェック()
- If Range("b10").Value = "" Then
- MsgBox "セルB10が空白です"
- End If
- End Sub
- １行目：「Subプロシージャ」の開始
- ２～４行目：「IF」～「End If」で、セル[B10]の値が空白の場合には、ダイアログボックスに「セルB10が空白です」というメッセージを表示する
- ５行目：「Subプロシージャ」の終了
【IF文の構成】
IF 条件式 Then
条件が成立する場合の処理
End If
・条件が成立した場合の処理を記述しますので、条件が不成立(セル[B10]に文字・数値等が入力されている状態)の場合は何も処理せず、つまりダイアログボックスの表示をしないで次の5行目の処理に移ります。
・ダイアログボックスを表示するには、[MsgBox]という命令を使います。
次にシート[実習用VBA]で実習を行いましょう。
確認が終わりましたら、VBE画面の左上[Excel]アイコンをクリックしてシート[VBA説明用]に戻りましょう。
