VBA IF ステートメントで AND 演算子を使用する

IFステートメントと演算子ANDをVBAで一緒に使用する方法を例を挙げて紹介します。

VBA の If ステートメントで AND 演算子を使用する

AND 演算子の関数は、すべての演算子条件が True の場合にのみ True を返します。 AND 演算子の条件のいずれかが False の場合、False が返されます。

If ステートメントで AND 演算子を使用できます。これは、条件が True の場合に 1つの値を与え、条件が False の場合に別の値を与えます。

VBA では、AND 関数を VBA If ステートメントと組み合わせることができます。 VBA コーディングで 2つの関数を組み合わせることで、複数の条件をテストできます。

両方の関数が同時に true の場合、結果は True になり、2つの関数のいずれかの結果がある時点で false の場合、False になります。 以下の手順に従って、If 関数と AND 関数を組み合わせることができます。

1. コードは If キーワードで始まります。
2. If 関数の最初の条件を指定します。
3. AND キーワードを使用して 2 番目の関数を指定します。
4. AND 関数の 2 番目の条件を定義します。

If と AND の両方を一緒に使用する例を見てみましょう。

コード：

# vba
Sub IfANDTogether()

If 10 < 20 And 20 > 12 Then

  MsgBox "Congrats! Both Situations are passed"

Else

  MsgBox "Sorry! One or both situations have failed."

End If

End Sub

出力：

ご覧のとおり、両方の条件がTrueの場合、お祝いのメッセージを受け取ります。 しかし、一方または両方の状況が False の場合、申し訳ありませんというメッセージを受け取ります。

以下に示すように、3つ以上の条件を使用することもできます。

コード：

# vba
Sub ifAndTogether()

If 13 = 13 And 12 > 10 And 12 - 1 = 11 Then

MsgBox "Congrats! All Situations are passed."

Else

MsgBox "Sorry! Some or all situations have failed."

End If

End Sub

出力：

AND 演算子は、複数の条件で目的の結果を得るのに役立ちます。