Eller är en logisk funktion i något av programmeringsspråken och liknande i VBA har vi ELLER-funktion, eftersom det är en logisk funktion resultatet av denna funktion är antingen sant eller falskt, den här funktionen används för två eller många villkor tillsammans och ger oss sanna resultat när något av villkoren returneras sant.
Vad är ELLER-funktionen i VBA?
I Excel är logiska funktioner hjärtat i de formler vi använder dagligen. Logiska funktioner finns för att genomföra det logiska testet och ger resultat i boolesk datatyp dvs antingen SANT eller FALSKT. Några av de logiska formlerna i excel är ”IF, IFERROR i excel, ISERROR i excel, AND, och ELLER excel-funktion”. Jag hoppas att du har använt dem ganska ofta som en kalkylfunktion. Även i VBA kan vi använda dem alla och i den här artikeln kommer vi att förklara för dig hur du använder funktionen “VBA ELLER”.
Vad är det första du tänker på när du tänker på ordet ”ELLER”?
Enkelt uttryckt betyder "ELLER" "antingen detta eller det"
Med samma idé ELLER är en logisk funktion som ger resultatet som SANT om någon av de logiska testerna är SANT och ger FALSE som resultatet om ingen av de logiska testerna är SANT.
Detta fungerar precis motsatt VBA OCH-funktionen. OCH-funktionen returnerar SANT endast om alla logiska förhållanden är SANTA, om något av villkoren inte är uppfyllt får vi FALSE som resultat.
Formel för VBA ELLER-funktion
Låt mig inrama en syntax så att du förstår funktionen.
[Logiskt test] ELLER [Logiskt test] ELLER [Logiskt test]
Först måste vi nämna vad som är det logiska testet och sedan nämna ordet ELLER sedan nämna vad som är det andra logiska testet. Om du vill genomföra ett mer logiskt test ska du nämna ordet ELLER efter ett logiskt test.
Av alla logiska tester du gör, om någon av testerna är nöjda eller sanna så får vi resultatet som SANT om inget eller nöjt så är resultatet FALSKT.
Exempel på användning av ELLER-funktion i VBA
Vi visar ett enkelt exempel på hur du använder OR-funktionen i VBA.
Du kan ladda ner denna VBA ELLER Excel-mall här - VBA ELLER Excel-mallFör att förstå den logiska VBA-funktionen ELLER låt mig ge dig ett exempel. Låt oss säga att vi vill göra det logiska testet om siffran 25 är större än 20 eller nummer 50 är mindre än 30.
Steg 1: Skapa ett makronamn.
Steg 2: Definiera variabeln som en sträng.
Koda:
Under OR_Exempel1 () Dim i som sträng slut Sub
Steg 3: Nu för denna variabel tilldelar vi värdet genom ELLER logiskt test.
Koda:
Under OR_Exempel1 () Dim i som sträng i = Avsluta sub
Steg 4: Vårt första logiska test är 25> 20 .
Koda:
Under OR_Exempel1 () Dim i som sträng i = 25> 20 Slut sub
Steg 5: Nämn efter det första logiska testet ordet ELLER och ange det andra logiska testet.
Koda:
Under OR_Exempel1 () Dim i som sträng i = 25> 20 eller 50 <30 Slut sub
Steg 6: Ok, nu testar VBA ELLER funktion om de logiska testerna är SANTA eller FALSKA. Tilldela nu resultatet av variabeln till VBA- meddelanderutan .
Koda:
Sub OR_Exempel1 () Dim i som sträng i = 25> 20 eller 50 <30 MsgBox i End Sub
Steg 7: Kör makrot och vad resultatet är.
Vi fick resultatet som SANT eftersom av två logiska tester har vi angett att ett test är SANT så att resultatet är SANT.
25 är större än 20 och 50 är inte mindre än 30, i detta fall är det första logiska testet SANT men det andra är FALSE. Eftersom vi har tillämpat VBA ELLER-funktionen behöver det något av villkoren för att vara SANT för att få resultatet som SANT.
Titta nu på koden nedan.
Koda:
Sub OR_Exempel1 () Dim i som sträng i = 25 = 20 eller 50 = 30 MsgBox i End Sub
Jag har ändrat de logiska testekvationerna från> och <till lika (=) tecken. Detta kommer att returnera FALSE som ett resultat eftersom 25 inte är lika med 20 och 50 inte är lika med 30.
VBA ELLER-funktion med IF-tillståndet är kraftfullt
Som jag sa ELLER kan returnera antingen SANT eller FALSK som resultat, men med den andra logiska funktionen "OM" kan vi manipulera resultat enligt våra behov.
Ta samma logiska tester ovanifrån, ELLER har endast returnerat SANT eller FALSK men låt oss kombinera detta ELLER med IF.
Steg 1: Öppna funktionen IF innan du utför något test .
Koda:
Sub OR_Exempel2 () Dim i As String IF End Sub
Steg 2: Utför nu tester med OR- funktionen.
Koda:
Under OR_exempel2 () Dim i som sträng IF 25 = 20 eller 50 = 30 slut sub
Steg 3: Sätt ordet "Då" och skriv resultatet om villkoret är SANT, tilldela variabeln värdet som "Villkor är tillfredsställd" .
Koda:
Sub OR_Exempel2 () Dim i som sträng Om 25 = 20 eller 50 = 30 då i = "Villkoret är tillfredsställd" Avsluta sub
Steg 4: Om villkoret är FALSKT behöver vi ett annat resultat, så lägg ordet “ELSE” och tilldela värdet variabeln ”nästa resultat” om villkoret eller det logiska testet är FALSE i nästa rad.
Koda:
Sub OR_Exempel2 () Dim i som sträng Om 25 = 20 eller 50 = 30 då är i = "Villkoret tillfredsställt" Annars i = "Villkoret är inte tillfredsställt" Avsluta sub
Steg 5: Avsluta IF-funktionen med ordet "Avsluta om" .
Koda:
Sub OR_Exempel2 () Dim i som sträng Om 25 = 20 eller 50 = 30 då i = "Villkoret är tillfredsställt" Annars i = "Villkoret är inte tillfredsställd" Avsluta om slutet Sub
Steg 6: Tilldela värdet på variabelresultatet till meddelandefältet .
Koda:
Sub OR_Exempel2 () Dim i som sträng Om 25 = 20 eller 50 = 30 då i = "Villkoret är tillfredsställd" Annars i = "Villkoret är inte tillfredsställt" Avsluta om MsgBox i Avsluta sub
Kör makrot, om det logiska testet är SANT får vi resultatet som "Villkor är tillfredsställd" eller annars får vi "Villkor är inte tillfredsställd".
Vi fick resultatet som "Villkor är inte tillfredsställd" eftersom båda de logiska testerna är FALSKA.
Nu kommer jag att ändra de logiska testerna.
Koda:
Under OR_Exempel2 () Dim i som sträng Om 25> 20 eller 50 <30 Då är i = "Villkoret tillfredsställd" Annars i = "Villkoret är inte tillfredsställt" Avsluta om MsgBox i Avsluta sub
Jag kommer att köra makrot och se vad resultatet blir.
Så här kan vi använda en logisk funktion med andra logiska funktioner för att nå resultaten.
Lös nedanstående fallstudie för att vänja dig vid logiska funktioner.
Fallstudie att lösa
Jag har anställdas namn och deras respektive avdelningar.
Om du har försökt och inte hittat resultatet kan du hänvisa till koden nedan för att förstå logiken.
Koda:
Sub Bonus_Calculation () Dim i så länge för i = 2 till 10 om celler (i, 2) .Value = "Finance" eller celler (i, 2) .Value = "IT" Då celler (i, 3) .Value = 5000 andra celler (i, 3) .Värde = 1000 Avsluta om nästa i Avsluta 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.
