Logische VBA-Operatoren: UND, ODER NICHT
Logische Excel VBA-Operatoren
Angenommen, Sie möchten eine Kundenbestellung bearbeiten. Dazu möchten Sie zunächst prüfen, ob das bestellte Produkt vorhanden ist oder nicht. In diesem Fall möchten Sie auch überprüfen, ob die verfügbare Menge ausreicht. In solchen Fällen sind logische Operatoren nützlich. Logische Operatoren werden verwendet, um mehr als eine Bedingung auszuwerten.
Die wichtigsten logischen Excel VBA-Operatoren AND, OR, NOT sind in der folgenden Tabelle aufgeführt:
| S / N. | Operator | Beschreibung | Beispiel | Ausgabe |
| 1 | UND | UND: Dies wird verwendet, um mehr als eine Bedingung zu kombinieren. Wenn alle Bedingungen erfüllt sind, wird AND als wahr ausgewertet. Wenn eine der Bedingungen falsch ist, wird AND als falsch ausgewertet | Wenn wahr = wahr UND falsch = wahr, dann | falsch |
| 2 | ODER | ODER: Dies wird verwendet, um mehr als eine Bedingung zu kombinieren. Wenn eine der Bedingungen als wahr ausgewertet wird, gibt OR wahr zurück. Wenn alle falsch sind, gibt OR false zurück | Wenn wahr = wahr ODER wahr = falsch DANN | wahr |
| 3 | NICHT | NICHT: Dieser funktioniert wie eine Umkehrfunktion. Wenn die Bedingung wahr ist, wird false zurückgegeben, und wenn eine Bedingung falsch ist, wird true zurückgegeben. | Wenn NICHT (wahr) Dann | falsch |
Beispiel für einen Quellcode für logische VBA-Operatoren
Der Einfachheit halber werden wir hartcodierte Zahlen vergleichen.
Fügen Sie dem Blatt ActiveX-Schaltflächen über die Option "Einfügen" hinzu.
Stellen Sie die Eigenschaften wie in der Abbildung unten gezeigt ein
Die folgende Tabelle zeigt die Eigenschaften, die Sie ändern müssen, und die Werte, die Sie ebenfalls aktualisieren müssen.
| S / N. | Steuerung | Eigentum | Wert |
| 1 | CommandButton1 | Name | btnAND |
| Bildbeschriftung | UND-Operator (0 = 0) | ||
| 2 | CommandButton2 | Name | btnOR |
| Bildbeschriftung | ODER Operator (1 = 1) Oder (5 = 0) | ||
| 3 | CommandButton3 | Name | btnNOT |
| Bildbeschriftung | NOT Operator Not (0 =) |
Fügen Sie btnAND_Click den folgenden Code hinzu
Private Sub btnAND_Click()If (1 = 1) And (0 = 0) ThenMsgBox "AND evaluated to TRUE", vbOKOnly, "AND operator"ElseMsgBox "AND evaluated to FALSE", vbOKOnly, "AND operator"End IfEnd Sub
VBA If AND Operator
- "If (1 = 1) And (0 = 0) Then" Die if-Anweisung verwendet den logischen Operator AND, um zwei Bedingungen (1 = 1) And (0 = 0) zu kombinieren. Wenn beide Bedingungen erfüllt sind, wird der Code über dem Schlüsselwort 'Else' ausgeführt. Wenn beide Bedingungen nicht erfüllt sind, wird der Code unter dem Schlüsselwort 'Else' ausgeführt.
Fügen Sie btnOR_Click den folgenden Code hinzu
Private Sub btnOR_Click()If (1 = 1) Or (5 = 0) ThenMsgBox "OR evaluated to TRUE", vbOKOnly, "OR operator"ElseMsgBox "OR evaluated to FALSE", vbOKOnly, "OR operator"End IfEnd Sub
VBA If OR Operator
- "If (1 = 1) Or (5 = 0) Then" Die if-Anweisung verwendet den logischen Operator OR, um zwei Bedingungen (1 = 1) und (5 = 0) zu kombinieren. Wenn eine der Bedingungen erfüllt ist, wird der Code über dem Schlüsselwort Else ausgeführt. Wenn beide Bedingungen falsch sind, wird der Code unter dem Schlüsselwort Else ausgeführt.
Fügen Sie btnNOT_Click den folgenden Code hinzu
Private Sub btnNOT_Click()If Not (0 = 0) ThenMsgBox "NOT evaluated to TRUE", vbOKOnly, "NOT operator"ElseMsgBox "NOT evaluated to FALSE", vbOKOnly, "NOT operator"End IfEnd Sub
VBA Wenn NICHT Operator
- "If Not (0 = 0) Then" Die VBA If Not-Funktion verwendet den logischen Operator NOT, um das Ergebnis der if-Anweisungsbedingung zu negieren. Wenn die Bedingungen erfüllt sind, wird der Code unter dem Schlüsselwort 'Else' ausgeführt. Wenn die Bedingung erfüllt ist, wird der Code über dem Schlüsselwort Else ausgeführt.
Laden Sie Excel mit dem obigen Code herunter