Excel VBA If ステートメントで複数条件 (AND)で特定処理を実行する

2024年4月2日 2025年3月27日

Excel VBAの If ステートメントで複数条件 (AND)で、すべての条件が満たされている場合にのみ特定の処理を実行します。使い方や注意点など、サンプルコードをもとに具体的に解説します。

Excel VBAの資格でキャリアアップ！
就活や転職で有利になるVBAエキスパート資格を解説！
👉 VBAエキスパート資格のメリットを詳しく知る

1 Excel VBA If-ANDを利用
2 Excel VBA If-AND利用の注意点
3 Excel VBA If-ANDサンプルコード
- 3.1 基本構文
- 3.2 複数条件を組み合わせる際の注意点
4 Excel VBA If-ANDエラーを防ぐための最適な方法

Excel VBA If-ANDを利用

以下のようなシーンで利用されます。

・2つ以上の条件を組み合わせて判断する必要がある場合や、ある条件が他の複数の条件を同時に満たしているかどうかを確認する場合に使用します。

Excel VBA If-AND利用の注意点

・And演算子を使用して複数の条件を結合する際に、各条件が真である場合にのみ全体が真となります。

・条件が複雑になりすぎる場合は、条件を適切にグループ化して可読性を高めることが重要です。

Excel VBA If-ANDサンプルコード

基本構文

If 条件1 And 条件2 Then
　' 条件1と条件2が両方ともTrueの場合に実行されるコード
Else
　' 上記の条件が満たされない場合に実行されるコード
End If

複数条件を組み合わせる際の注意点

・条件の評価順序
And演算子を使用する際、各条件が適切に評価されるように注意が必要です。特に、条件が複雑になる場合は、括弧を使用して評価の順序を明確にしましょう。

・可読性の確保
複数の条件を組み合わせるとコードが読みにくくなる可能性があります。適切なインデントやコメントを使用して、コードの可読性を高めることが重要です。

Excel VBAの資格でキャリアアップ！
就活や転職で有利になるVBAエキスパート資格を解説！
👉 VBAエキスパート資格のメリットを詳しく知る

And演算子を使用して複数の条件を評価するコード例

Option Explicit

Sub MultipleConditionsExample()
    Dim x As Integer
    x = 10

    If x > 5 And x < 15 And x <> 12 Then
        MsgBox "xは6から14までの間かつ12ではありません。"
    Else
        MsgBox "条件を満たしません。"
    End If
End Sub

マクロができる人が少ない職場
数年後にはあなたより効率的な後輩にポジションを奪われるかもしれません。
👉 詳細はこちら

サンプルコードは、変数　x　が6から14の範囲にあり、かつ12ではない場合にメッセージを表示します。