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, wie Sie die Funktion „VBA OR“ verwenden können.
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 FALSE als Ergebnis, wenn keiner der logischen Tests TRUE ist.
Dies funktioniert genau entgegengesetzt zur VBA AND-Funktion. Die AND-Funktion gibt nur dann TRUE zurück, wenn alle logischen Bedingungen TRUE sind. Wenn eine der Bedingungen nicht erfüllt ist, erhalten wir als Ergebnis FALSE.
Die Formel von VBA OR Function
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 erwähnen, dann erwähnen, was der zweite logische Test ist. Wenn Sie einen logischeren Test durchführen möchten, erwähnen Sie das Wort ODER, nachdem Sie einen logischen Test durchgeführt haben.
Wenn von 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, dann 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.
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: Nun weisen wir für diese Variable 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 von uns bereitgestellten 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, der zweite 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
Step 3: Put the word “Then” and write the result. If the condition is TRUE, assign the value to the variable as “Condition is Satisfied.”
Code:
Sub OR_Example2() Dim i As String If 25 = 20 Or 50 = 30 Then i = "Condition is Satisfied" End Sub
Step 4: If the condition is FALSE, then we need a different result, so put the word “ELSE” and, in the next line, assign the value to the variable “what should be the result if the condition or logical test is FALSE.”
Code:
Sub OR_Example2() Dim i As String If 25 = 20 Or 50 = 30 Then i = "Condition is Satisfied" Else i = "Condition is not Satisfied" End Sub
Step 5: End the IF function with the word “End If.”
Code:
Sub OR_Example2() Dim i As String If 25 = 20 Or 50 = 30 Then i = "Condition is Satisfied" Else i = "Condition is not Satisfied" End If End Sub
Step 6: Assign the value of the variable result to the message box.
Code:
Sub OR_Example2() Dim i As String If 25 = 20 Or 50 = 30 Then i = "Condition is Satisfied" Else i = "Condition is not Satisfied" End If MsgBox i End Sub
Run the macro, if the logical test is TRUE, we will get the result as “Condition is Satisfied,” or else we will get “Condition is not Satisfied.”
We got the result as “Condition is not Satisfied” because both the logical tests are FALSE.
Now I will change the logical tests.
Code:
Sub OR_Example2() Dim i As String If 25> 20 Or 50 < 30 Then i = "Condition is Satisfied" Else i = "Condition is not Satisfied" End If MsgBox i End Sub
I will run the macro and see what the result is.
Like this, we can use one logical function with other logical functions to arrive at the results.
Solve the below case study to get used to logical functions.
Case Study to Solve
I have employee names and their respective departments.
If you have tried and not found the result, then you can refer below code to understand the logic.
Code:
Sub Bonus_Calculation() Dim i As Long For i = 2 To 10 If Cells(i, 2).Value = "Finance" Or Cells(i, 2).Value = "IT" Then Cells(i, 3).Value = 5000 Else Cells(i, 3).Value = 1000 End If Next i End Sub
Wenn der Mitarbeiter aus "Finanzen" oder "IT" stammt, sollte er den Bonus als "5000" erhalten. Für andere Abteilungsmitarbeiter beträgt der Bonus „1000“.
Führen Sie den logischen Test durch und kommen Sie zu den Ergebnissen.
