条件分岐を使いこなそう。

マクロで処理をするとき、条件によって処理する内容を変えたいときがあります。
そのときに使うのが、IF文やSelect Case文です。

１．基本は、IF文。

条件分岐の基本は、IF文です。
IF文はあらゆるときに使うことができるので、これだけ知っていればまずOKです。

Sub test() 　　If Range("a1") > 10 Then　←① 　　　　MsgBox "項目１が、大きすぎます。" 　　ElseIf Range("b1") = "" Then　←② 　　　　MsgBox "項目２が、記入されていません。" 　　Else　←③ 　　　　MsgBox "正常です。" 　　End If End Sub	①　A1の値が１０を越えていたら、メッセージを表示します。 ②　B1に何も書かれていなかったら、メッセージを表示します。 ③　それ以外の時は、「正常です。」とメッセージを表示します。
IF文のよいところは、「どんな条件でも、羅列すれば上から順番に判断して処理していく」ことです。上の例でいくと、①と②では、扱うセルも、扱う型（①は数値で、②は文字）も違います。

２．Select Case文で、場合分けをする。

条件分岐をさせるのに、判断するものが１つだったら、もっと簡単にわかりやすく書くことができます。

Sub test() 　　Select Case Range("A1")　←① 　　　　Case Is > 10　←② 　　　　　　MsgBox "項目１が、大き過ぎます。" 　　　　Case Is < 0　←③ 　　　　　　MsgBox "項目１が、小さ過ぎます。" 　　　　Case Else　←④ 　　　　　　MsgBox "正常です。" 　　End Select End Sub	①　ここで、どの変数を扱うか指定します。 ②　その変数が１０より大きければ、メッセージを表示します。 ③　その変数が０より小さければ、メッセージを表示します。 ④　それ以外の時は、「正常です。」とメッセージを表示します。
Select Case文のよいところは、条件だけを簡潔に書いているので、見やすいことです。ただし、１つの変数しか扱うことができません。

３．Select Case文で、さらに整理する。

比較をするとき、等号で比較する場合は、さらに見やすく書くことができます。
下のプロシージャは、A1に入っている教科が、低・中・高学年のどれに当てはまるか判断するものです。
そして、１つめの例は、そのままで、２つめの例は、整理して書きました。

Sub Slect文3()

　　Select Case Rnge("A1")
　　　　Case Is = "国語"
　　　　　　MsgBox "低学年・中学年・高学年"

　　　　Case Is = "社会"
　　　　　　MsgBox "中学年・高学年"

　　　　Case Is = "算数"
　　　　　　MsgBox "低学年・中学年・高学年"

　　　　Case Is = "理科"
　　　　　　MsgBox "中学年・高学年"

　　　　Case Is = "生活"
　　　　　　MsgBox "低学年"

　　　　Case Is = "音楽"
　　　　　　MsgBox "低学年・中学年・高学年"

　　　　Case Is = "図工"
　　　　　　MsgBox "低学年・中学年・高学年"

　　　　Case Is = "家庭科"
　　　　　　MsgBox "高学年"

　　　　Case Is = "体育"
　　　　　　MsgBox "低学年・中学年・高学年"

　　　　Case Is = "" '空欄の時の処理
　　　　　　MsgBox "何もありません。"

　　End Select

End Sub

9教科を、どの学年に当てはまるか判断して、メッセージを表示します。

ただ、ここまで多くなってくると、ちょっと見にくくなってきます。

Sub Slect文4()

　　Select Case Range("A1")
　　　　Case Is = "国語", "算数", "音楽", "図工", "体育"　←①
　　　　　　MsgBox "低学年・中学年・高学年"

　　　　Case Is = "社会", "理科"　←②
　　　　　　MsgBox "中学年・高学年"

　　　　Case Is = "生活"
　　　　　　MsgBox "低学年"

　　　　Case Is = "家庭科"
　　　　　　MsgBox "高学年"

　　　　Case Is = "" '空欄の時の処理
　　　　　　MsgBox "何もありません。"

　　End Select

End Sub

上のプロシージャは、判断する項目が多くなってきたので、
ここでは、同じ結果を返すものを、まとめてみました。

①のところで、国語・算数・音楽・図工・体育は、共通して、
「低学年・中学年・高学年」とメッセージを返すので、
　，（カンマ）　で区切って並べました。

同じように、②も、カンマで区切って並べました。

こうすることで、非常にすっきりとして見やすくなりました。