Eller er en logisk funktion i et hvilket som helst af programmeringssprogene og lignende i VBA, vi har ELLER-funktion, da det er en logisk funktion, resultatet af denne funktion er enten sandt eller falsk, denne funktion bruges til to eller mange forhold sammen og giver os sande resultat, når en af betingelserne returneres sande.
Hvad er ELLER funktion i VBA?
I Excel er logiske funktioner hjertet i de formler, vi bruger dagligt. Logiske funktioner er der for at udføre den logiske test og giver resultat i boolsk datatype, dvs. enten SAND eller FALSK. Nogle af de logiske formler i excel er “IF, IFERROR i excel, ISERROR i excel, AND og OR excel-funktion.” Jeg håber, du har brugt dem ganske ofte som en regnearkfunktion. Også i VBA kan vi bruge dem alle, og i denne artikel vil vi forklare dig, hvordan du bruger funktionen “VBA ELLER”.
Hvad er det første, du tænker på, når du tænker på ordet “ELLER”?
Enkelt sagt betyder “ELLER ” enten dette eller det ”
Med den samme idé er OR en logisk funktion, der giver resultatet som SAND, hvis en af de logiske tests er SAND og giver FALSK som resultatet, hvis ingen af de logiske tests er SAND.
Dette fungerer nøjagtigt modsat af VBA OG funktion. AND-funktionen returnerer kun SAND, hvis alle de logiske forhold er SANDE. Hvis nogen af betingelserne ikke er opfyldt, får vi FALSK som et resultat.
Formlen for VBA ELLER-funktion
Lad mig indramme en syntaks, så du kan forstå funktionen.
(Logisk test) ELLER (Logisk test) ELLER (Logisk test)
Først skal vi nævne, hvad der er den logiske test, derefter nævne ordet OR og derefter nævne, hvad den anden logiske test er. Hvis du ønsker at foretage en mere logisk test, skal du nævne ordet ELLER efter at have udført en logisk test.
Af alle de logiske tests, du laver, hvis nogen af testene er tilfredse eller sande, får vi resultatet som SAND, hvis det ikke er eller tilfreds, så er resultatet FALSK.
Eksempler på brug af ELLER-funktion i VBA
Vi viser dig et simpelt eksempel på brug af OR-funktionen i VBA.
For at forstå den logiske VBA-funktion ELLER lad mig give dig et eksempel. Lad os sige, at vi vil udføre den logiske test, om antallet 25 er større end 20 eller nummer 50 er mindre end 30.
Trin 1: Opret et makronavn.
Trin 2: Definer variablen som en streng.
Kode:
Under OR_eksempel1 () Dim i som streng slut sub
Trin 3: Nu, for denne variabel, tildeler vi værdien gennem ELLER logisk test.
Kode:
Under OR_eksempel1 () Dim i som streng i = afslut sub
Trin 4: Vores første logiske test er 25> 20 .
Kode:
Under OR_eksempel1 () Dim i som streng i = 25> 20 Afslut sub
Trin 5: Efter den første logiske test skal du nævne ordet ELLER og indtaste den anden logiske test.
Kode:
Under OR_eksempel1 () Dim i som streng i = 25> 20 eller 50 <30 Afslut sub
Trin 6: Ok, nu tester VBA ELLER-funktion, om de logiske tests er SANDE eller FALSKE. Tildel nu resultatet af variablen til VBA- meddelelsesfeltet .
Kode:
Sub OR_eksempel1 () Dim i som streng i = 25> 20 eller 50 <30 MsgBox i End Sub
Trin 7: Kør makroen, og hvad resultatet er.
Vi fik resultatet som SAND, for ud af to logiske tests, vi har leveret, er en test SAND, så resultatet er SAND.
25 er større end 20, og 50 er ikke mindre end 30. I dette tilfælde er den første logiske test SAND, men den anden er FALSK. Fordi vi har anvendt VBA ELLER-funktionen, skal den have en af betingelserne for at være SAND for at få resultatet som SAND.
Se nu på nedenstående kode.
Kode:
Sub OR_eksempel1 () Dim i som streng i = 25 = 20 eller 50 = 30 MsgBox i End Sub
Jeg har ændret de logiske testligninger fra> og <til lige (=) tegn. Dette returnerer FALSK som resultat, fordi 25 ikke er lig med 20 og 50 ikke er lig med 30.
VBA ELLER funktion med IF-tilstand er kraftig
Som jeg fortalte, kan OR returnere enten SAND eller FALSK som et resultat, men med den anden logiske funktion "HVIS" kan vi manipulere resultater efter vores behov.
Tag de samme logiske tests ovenfra, ELLER har kun returneret SAND eller FALSK, men lad os kombinere dette ELLER med HVIS.
Trin 1: Åbn funktionen HVIS før du udfører en test .
Kode:
Sub OR_Example2 () Dim i As String IF End Sub
Trin 2: Udfør nu tests ved hjælp af OR- funktionen.
Kode:
Under OR_eksempel2 () Dim i som streng IF 25 = 20 eller 50 = 30 slut 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
Hvis medarbejderen er fra "Finance" eller "IT", skal de få bonusen som "5000". For andre afdelingsmedarbejdere er bonusen "1000".
Udfør den logiske test og nå frem til resultaterne.
