VBA ODER Funktion

Oder ist eine logische Funktion in einer der Programmiersprachen und ähnlich in VBA haben wir eine ODER-Funktion, da es sich um eine logische Funktion handelt, ist das Ergebnis dieser Funktion entweder wahr oder falsch. Diese Funktion wird für zwei oder viele Bedingungen zusammen verwendet und gibt uns wahres Ergebnis, wenn eine der Bedingungen wahr zurückgegeben wird.

Was ist die ODER-Funktion in VBA?

In Excel sind logische Funktionen das Herzstück der Formeln, die wir täglich verwenden. Logische Funktionen dienen zur Durchführung des logischen Tests und geben das Ergebnis im Booleschen Datentyp an, dh entweder TRUE oder FALSE. Einige der logischen Formeln in Excel sind "IF, IFERROR in Excel, ISERROR in Excel, AND und OR Excel-Funktion". Ich hoffe, Sie haben sie ziemlich oft als Arbeitsblattfunktion verwendet. Auch in VBA können wir alle verwenden. In diesem Artikel erklären wir Ihnen die Verwendung der Funktion „VBA OR“.

Was fällt Ihnen als Erstes ein, wenn Sie an das Wort „ODER“ denken?

In einfachen Worten bedeutet "ODER" "entweder dies oder das"

Mit der gleichen Idee ist OR eine logische Funktion, die das Ergebnis als TRUE angibt, wenn einer der logischen Tests TRUE ist, und als Ergebnis FALSE gibt, wenn keiner der logischen Tests TRUE ist.

Dies funktioniert genau entgegengesetzt zur VBA AND-Funktion. Die AND-Funktion gibt TRUE nur zurück, wenn alle logischen Bedingungen TRUE sind. Wenn eine der Bedingungen nicht erfüllt ist, erhalten wir als Ergebnis FALSE.

Formel der VBA ODER-Funktion

Lassen Sie mich eine Syntax festlegen, damit Sie die Funktion verstehen.

[Logischer Test] ODER [Logischer Test] ODER [Logischer Test]

Zuerst müssen wir erwähnen, was der logische Test ist, dann das Wort ODER dann erwähnen, was der zweite logische Test ist. Wenn Sie einen logischeren Test durchführen möchten, erwähnen Sie das Wort ODER nach dem Umkehren des logischen Tests.

Wenn bei allen logischen Tests, die Sie durchführen, einer der Tests erfüllt oder wahr ist, erhalten wir das Ergebnis als WAHR, wenn keiner oder zufrieden ist, ist das Ergebnis FALSCH.

Beispiele für die Verwendung der ODER-Funktion in VBA

Wir zeigen Ihnen ein einfaches Beispiel für die Verwendung der OR-Funktion in VBA.

Sie können diese VBA- ODER Excel-Vorlage hier herunterladen - VBA- ODER Excel-Vorlage

Um die logische VBA-Funktion zu verstehen ODER lassen Sie mich ein Beispiel geben. Angenommen, wir möchten den logischen Test durchführen, ob die Zahl 25 größer als 20 oder die Zahl 50 kleiner als 30 ist.

Schritt 1: Erstellen Sie einen Makronamen.

Schritt 2: Definieren Sie die Variable als Zeichenfolge.

Code:

 Sub OR_Example1 () Dim i As String End Sub

Schritt 3: Für diese Variable weisen wir den Wert durch den logischen ODER-Test zu.

Code:

 Sub OR_Example1 () Dim i As String i = End Sub

Schritt 4: Unser erster logischer Test ist 25> 20 .

Code:

 Sub OR_Example1 () Dim i As String i = 25> 20 End Sub

Schritt 5: Erwähnen Sie nun nach dem ersten logischen Test das Wort ODER und geben Sie den zweiten logischen Test ein.

Code:

 Sub OR_Example1 () Dim i As String i = 25> 20 oder 50 <30 End Sub

Schritt 6: Ok, jetzt testet die VBA OR-Funktion, ob die logischen Tests TRUE oder FALSE sind. Weisen Sie nun das Ergebnis der Variablen dem VBA- Meldungsfeld zu .

Code:

 Sub OR_Example1 () Dim i As String i = 25> 20 oder 50 <30 MsgBox i End Sub

Schritt 7: Führen Sie das Makro aus und was das Ergebnis ist.

Wir haben das Ergebnis als WAHR erhalten, da von zwei logischen Tests ein Test WAHR ist und das Ergebnis WAHR ist.

25 ist größer als 20 und 50 ist nicht kleiner als 30, in diesem Fall ist der erste logische Test WAHR, aber der zweite ist FALSCH. Da wir die VBA OR-Funktion angewendet haben, muss eine der Bedingungen TRUE sein, um das Ergebnis als TRUE zu erhalten.

Schauen Sie sich nun den folgenden Code an.

Code:

 Sub OR_Example1 () Dim i As String i = 25 = 20 oder 50 = 30 MsgBox i End Sub

Ich habe die logischen Testgleichungen von> und <in Gleichheitszeichen (=) geändert. Dies gibt als Ergebnis FALSE zurück, da 25 nicht gleich 20 und 50 nicht gleich 30 ist.

VBA OR-Funktion mit IF-Bedingung ist leistungsstark

Wie ich bereits sagte, kann OR als Ergebnis entweder TRUE oder FALSE zurückgeben, aber mit der anderen logischen Funktion „IF“ können wir die Ergebnisse gemäß unseren Anforderungen bearbeiten.

Nehmen Sie die gleichen logischen Tests von oben vor, OR hat nur TRUE oder FALSE zurückgegeben, aber kombinieren wir dieses OR mit IF.

Schritt 1: Öffnen Sie vor der Durchführung eines Tests die Funktion IF .

Code:

 Sub OR_Example2 () Dim i As String IF End Sub

Schritt 2: Führen Sie nun Tests mit der ODER- Funktion durch.

Code:

 Sub OR_Example2 () Dim i As String IF 25 = 20 oder 50 = 30 End Sub

Schritt 3: Geben Sie das Wort "Dann" ein und schreiben Sie das Ergebnis, wenn die Bedingung WAHR ist. Weisen Sie der Variablen den Wert "Bedingung ist erfüllt" zu .

Code:

 Sub OR_Example2 () Dim i As String Wenn 25 = 20 oder 50 = 30, dann i = "Bedingung ist erfüllt" End Sub

Schritt 4: Wenn die Bedingung FALSE ist, benötigen wir ein anderes Ergebnis. Geben Sie also das Wort "ELSE" ein und weisen Sie in der nächsten Zeile der Variablen "Was sollte das Ergebnis sein, wenn die Bedingung oder der logische Test FALSE ist" den Wert zu.

Code:

 Sub OR_Example2 () Dim i As String Wenn 25 = 20 oder 50 = 30, dann i = "Bedingung ist erfüllt" Sonst i = "Bedingung ist nicht erfüllt" End Sub

Schritt 5: Beenden Sie die IF-Funktion mit dem Wort "End If" .

Code:

 Sub OR_Example2 () Dim i As String Wenn 25 = 20 oder 50 = 30 Dann i = "Bedingung ist erfüllt" Sonst i = "Bedingung ist nicht erfüllt" End If End Sub

Schritt 6: Weisen Sie dem Meldungsfeld den Wert des Variablenergebnisses zu .

Code:

 Sub OR_Example2 () Dim i As String Wenn 25 = 20 oder 50 = 30 Dann i = "Bedingung ist erfüllt" Sonst i = "Bedingung ist nicht erfüllt" End If MsgBox i End Sub

Führen Sie das Makro aus. Wenn der logische Test WAHR ist, erhalten Sie das Ergebnis als "Bedingung ist erfüllt" oder "Bedingung ist nicht erfüllt".

Wir haben das Ergebnis als "Bedingung ist nicht erfüllt" erhalten, da beide logischen Tests FALSCH sind.

Jetzt werde ich die logischen Tests ändern.

Code:

 Sub OR_Example2 () Dim i As String Wenn 25> 20 oder 50 <30 Dann i = "Bedingung ist erfüllt" Sonst i = "Bedingung ist nicht erfüllt" End If MsgBox i End Sub

Ich werde das Makro ausführen und sehen, was das Ergebnis ist.

Auf diese Weise können wir eine logische Funktion mit anderen logischen Funktionen verwenden, um zu den Ergebnissen zu gelangen.

Lösen Sie die folgende Fallstudie, um sich an logische Funktionen zu gewöhnen.

Fallstudie zu lösen

Ich habe Mitarbeiternamen und ihre jeweiligen Abteilungen.

Wenn Sie versucht haben, das Ergebnis nicht zu finden, können Sie den folgenden Code verwenden, um die Logik zu verstehen.

Code:

 Sub Bonus_Calculation () Dim i As Long For i = 2 bis 10 If Cells (i, 2) .Value = "Finance" oder Cells (i, 2) .Value = "IT" Then Cells (i, 3) .Value = 5000 andere Zellen (i, 3) .Wert = 1000 End If Next i End Sub

If the employee is from “Finance” or “IT” then they should get the bonus as “5000”. For other department employees, the bonus is “1000”.

Conduct the logical test and arrive at the results.