OM ELLER inte är ett enda påstående är det två logiska funktioner som används tillsammans tillsammans i VBA, vi använder dessa två logiska funktioner tillsammans när vi har mer än ett kriterium att kontrollera och om något av kriterierna är uppfyllda får vi det sanna resultatet, när vi använder if-uttalandet eller uttalandet används mellan de två kriterierna för If-uttalandet.
OM ELLER-funktion i VBA
Logiska funktioner är kärnan i alla kriteriebaserade beräkningar. ”IF” är den mest populära logiska funktionen, vare sig det är en kalkylfunktion eller som en VBA-funktion, den tjänar utmärkt för våra behov. Men ytterligare en logisk funktion, "ELLER" i Excel, är den mest underskattade funktionen. Det är också viktigt att behärska när det gäller att lösa komplexa beräkningar. I den här artikeln tar vi dig igenom VBA IF ELLER-funktionen i detalj. Läs hela artikeln för att få funktionen i detalj.
Hur använder jag IF med ELLER-funktion i VBA?
Vi visar ett enkelt exempel på hur du använder IF ELLER-funktionen i VBA.
En kombination av logiska funktioner är de bästa paren i Excel. När du kombinerar många logiska formler i den andra logiska formeln föreslår det att beräkning kräver många villkor för att testa.
Titta nu på syntaxen för IF ELLER-funktionen i VBA.
(Test) ELLER (Test) ELLER (Test)
Detta är detsamma som vi såg i kalkylbladsexemplet. För en bättre förståelse, se nedanstående exempel.
Vi har föregående månads pris, det senaste 6-månaders genomsnittspriset och det aktuella månadspriset här.
För att bestämma om vi ska köpa produkten eller inte, måste vi göra några tester här, och de är det.
Om det aktuella priset är lägre än eller lika med något av de andra två priserna, bör vi få resultatet som "Köp" eller annars skulle resultatet få som "Köp inte".
Steg 1: Öppna IF-tillstånd inuti underproceduren.
Koda:
Sub IF_OR_Example1 () Om End Sub
Steg 2: Använd IF-villkoret, använd det första logiska testet som Range ("D2"). Värde <= Range ("B2").
Koda:
Under IF_OR_Exempel1 () Om intervall (“D2”). Värde <= Område (“B2”). Värde slut Sub
Steg 3: Första logiska villkoret är klart, öppna nu ELLER uttalande.
Koda:
Sub IF_OR_Example1 () If Range ("D2"). Value <= Range ("B2"). Value OR End Sub
Steg 4: Använd nu det andra logiska villkoret som Range (“D2”). Värde <= Range (“C2”).
Koda:
Under IF_OR_Exempel1 () Om intervall ("D2"). Värde <= Område ("B2"). Värde ELLER Område ("D2"). Värde <= Område ("C2"). Värde Slut Sub
Steg 5: Ok, vi är klara med de logiska testerna här. Efter de logiska testerna sätter du ordet ”Sedan”.
Koda:
Under IF_OR_Exempel1 () Om intervall ("D2"). Värde <= Område ("B2"). Värde eller intervall ("D2"). Värde <= Område ("C2"). Värde Avsluta sedan Sub
Steg 6: Skriv i nästa rad vad som ska bli resultatet om det logiska testet är SANT. Om villkoret är SANT behöver vi resultatet som "Köp" i cell E2.
Koda:
Under IF_OR_Exempel1 () Om intervall ("D2"). Värde <= Område ("B2"). Värde eller intervall ("D2"). Värde <= Område ("C2"). Värde Sedan intervall ("E2"). Värde = "Köp" Slutund
Steg 7: Om resultatet är FALSKT bör vi få resultatet som "Köp inte". Så i nästa rad, sätt "Else" och skriv koden i nästa rad.
Koda:
Under IF_OR_Exempel1 () Om intervall ("D2"). Värde <= Område ("B2"). Värde eller intervall ("D2"). Värde <= Område ("C2"). Värde Sedan intervall ("E2"). Value = "Buy" Else Range ("E2") Value = "Buy not" End Sub
Steg 8: Stäng IF-uttalandet med ordet "Avsluta om."
Koda:
Under IF_OR_Exempel1 () Om intervall ("D2"). Värde <= Område ("B2"). Värde eller intervall ("D2"). Värde <= Område ("C2"). Värde därefter Område ("E2"). Värde = "Köp" Annat intervall ("E2"). Värde = "Köp inte" Slut om slut sub
Okej, vi är klara med kodningsdelen.
Låt oss köra den här koden med F5 eller manuellt genom köralternativet och se vad resultatet är i cell E2.
Vi fick resultatet som "Köp" eftersom det aktuella månadspriset på Apple är lägre än priset för både "Föregående månad" och "6 månaders genomsnittspris".
OM ELLER VBA-funktion med öglor (avancerad)
Once you understand the formula, try to use it with a larger number of cells. In the case of a larger number of cells, we cannot write any line of code, so we need to use VBA loops.
For the above set of data, I have added a few more lines.
We need to use the For Next loop here.
Just keep the current code as it is.
Declare the variable as an integer.
Now open For Next Loop from 2 to 9.
Now, wherever we have cell reference, change the current number, and concatenate the variable “k” with them.
For example, Range (“D2”).Value should be Range (“D” & k).Value
Now run the code. We should get the status in all the cells.
You can copy the code below.
Code:
Sub IF_OR_Exempel1 () Dim k som heltal För k = 2 till 9 Om intervall ("D" & k). Värde <= Område ("B" & k). Värde eller intervall ("D" & k). Värde <= Range ("C" & k) .Value Then Range ("E" & k) .Value = "Buy" Else Range ("E" & k) .Value = "Buy not" End If Next k End Sub
