VBA 論理 Operaトル: Excel VBA の AND、OR、NOT、IF NOT
シャーロット・ミラー
Excel VBA 論理 Operaトー
顧客の注文を処理したいとします。そのためには、まず注文された製品が存在するかどうかを確認します。存在する場合は、在庫数が十分かどうかも確認します。このような場合に、論理演算子が役立ちます。論理演算子は、複数の条件を評価するために使用されます。
主な Excel VBA 論理演算子 AND、OR、NOT を次の表に示します。
| S / N | Operaタ | 説明 | 例 | 出力 |
|---|---|---|---|---|
| 1 | そして | AND: 複数の条件を組み合わせるために使用されます。 すべての条件が true の場合、AND は true と評価されます。 いずれかの条件が false の場合、AND は false と評価されます。 | true = true かつ false = true の場合 THEN | false |
| 2 | OR | OR: 複数の条件を組み合わせるために使用されます。 いずれかの条件が true と評価されると、OR は true を返します。 それらがすべて false の場合、OR は false を返します | true = true または true = false の場合 THEN | true |
| 3 | NOT | NOT: これは逆関数のように機能します。 条件が true の場合は false を返し、条件が false の場合は true を返します。 | そうでない場合 (真)、 | false |
VBA 論理 Operators ソースコード例
簡単にするために、ハードコードされた数値を比較します。
「挿入オプション」からシートにActiveXボタンを追加します。
以下の図に示すようにプロパティを設定します。
次の表は、変更する必要があるプロパティと更新する必要がある値を示しています。
| S / N | 管理 | プロパティ | 値 |
|---|---|---|---|
| 1 | コマンドボタン1 | お名前 | ボタンAND |
| キャプション | そして Operaトール (0 = 0) | ||
| 2 | コマンドボタン2 | お名前 | btnOR |
| キャプション | OR Operator (1 = 1) または (5 = 0) | ||
| 3 | コマンドボタン3 | お名前 | そうではない |
| キャプション | NOT Operaそうでない (0 = ) |
btnAND_Clickに次のコードを追加します
Private Sub btnAND_Click()
If (1 = 1) And (0 = 0) Then
MsgBox "AND evaluated to TRUE", vbOKOnly, "AND operator"
Else
MsgBox "AND evaluated to FALSE", vbOKOnly, "AND operator"
End If
End Sub
VBA の場合 AND Operaタ
- 「もし (1 = 1) そして (0 = 0) ならば」 if ステートメントは AND 論理演算子を使用して 1 つの条件 (1 = 0) および (0 = XNUMX) を組み合わせます。両方の条件が true の場合、「Else」キーワードの上のコードが実行されます。両方の条件が true でない場合は、「Else」キーワードの下のコードが実行されます。
btnOR_Clickに次のコードを追加します
Private Sub btnOR_Click()
If (1 = 1) Or (5 = 0) Then
MsgBox "OR evaluated to TRUE", vbOKOnly, "OR operator"
Else
MsgBox "OR evaluated to FALSE", vbOKOnly, "OR operator"
End If
End Sub
VBA If OR Operaタ
- 「もし (1 = 1) または (5 = 0) ならば」 if ステートメントは、OR 論理演算子を使用して 1 つの条件 (1 = 5) と (0 = XNUMX) を組み合わせます。いずれかの条件が true の場合、Else キーワードの上のコードが実行されます。両方の条件が false の場合、Else キーワードの下のコードが実行されます。
btnNOT_Clickに次のコードを追加します
Private Sub btnNOT_Click()
If Not (0 = 0) Then
MsgBox "NOT evaluated to TRUE", vbOKOnly, "NOT operator"
Else
MsgBox "NOT evaluated to FALSE", vbOKOnly, "NOT operator"
End If
End Sub
VBA でない場合 Operaタ
- 「そうでない場合 (0 = 0)」 VBA の If Not 関数は、NOT 論理演算子を使用して、if ステートメント条件の結果を否定します。条件が true の場合、「Else」キーワードの下のコードが実行されます。条件が true の場合、「Else」キーワードの上のコードが実行されます。