Excel VBA OG funksjon
AND er en logisk funksjon så vel som en logisk operatør som betyr at hvis alle vilkårene i denne funksjonen er oppfylt, vil bare vi ha det sanne resultatet, mens hvis en av betingelsene mislykkes, blir resultatet returnert til å være falsk, har vi innebygd OG kommando i VBA å bruke.
Jeg håper du har gått gjennom artikkelen vår om “VBA OR” og “VBA IF OR.” Denne funksjonen er akkurat det motsatte av OR-funksjonen. I ELLER-funksjonen trengte vi noen av de medfølgende logiske forholdene for å være oppfylt for å få resultatet som SANT. Men i AND-funksjonen er det bare motsatt. For å få resultatet av TRUE, må alle leverte logiske tester i Excel være oppfylt.
Ok, se på syntaksen til AND-funksjonen i excel.
(Logisk test) OG (Logisk test) OG (Logisk test)
I det ovennevnte har jeg to testresultater av 600.
I resultatkolonnen må jeg få resultatet som SANT hvis poengsummen for begge testene er større enn lik 250.
Se på bildet nedenfor.
Når vi bruker den logiske funksjonen OG fikk vi resultatene. I celle C4 og C5 fikk vi resultatet som SANT fordi Test 1 og Test 2-poeng er større enn eller lik 250.
Se på C6-cellen her. Vi har FALSE, selv om poengsummen på Test 2 er lik 250. Dette er fordi i Test 1 er poengsummen bare 179.
Eksempler på bruk av VBA og funksjon
Eksempel 1
For eksempel vil vi teste tallene her, om 25> = 20 og 30 <= 31.
Trinn 1: Erklær variabelen som streng.
Kode:
Sub AND_Example1 () Dim K Som streng End Sub
Trinn 2: For variabelen “k” tildeler vi verdien ved å bruke AND-funksjonen.
Kode:
Sub AND_Example1 () Dim K Som String K = End Sub
Trinn 3: Gi den første betingelsen som 25> = 20.
Kode:
Sub AND_Example1 () Dim K som streng K = 25> = 20 End Sub
Trinn 4: Åpne nå OG-funksjonen og gi den andre logiske testen, dvs. 30 <= 29.
Kode:
Sub AND_Example1 () Dim K Som streng K = 25> = 20 og 30 <= 29 End Sub
Trinn 5: Vis nå resultatet av variabelen “k” i meldingsboksen i VBA.
Kode:
Sub AND_Example1 () Dim K Som streng K = 25> = 20 og 30 <= 29 MsgBox K End Sub
Kjør makroen for å se hva resultatet er.
Vi fikk resultatet som FALSE fordi vi ikke brukte to forhold, den første betingelsen 25> = 20, denne tilstanden er tilfredsstilt, så resultatet er SANT, og den andre betingelsen 30 <= 29 dette er ikke tilfredsstilt, resultatet er FALSK. For å få resultatet som SANT, bør begge vilkårene være oppfylt.
Eksempel 2
Nå vil jeg endre den logiske testen til “100> 95 OG 100 <200.”
Kode:
Sub AND_Example2 () Dim k As String k = 100> 95 And 100 <200 MsgBox k End Sub
Kjør koden for å se resultatet.
Her fikk vi SANN som et resultat fordi
1 st Logikktest: 100> 95 = TRUE
2 nd Logikktest: 100 <200 = TRUE
Siden vi fikk de SANTE resultatene for begge de logiske testene, ble vårt endelige resultat som SANT.
Eksempel 3
Nå vil vi se data fra regnearket. Bruk dataene vi har brukt for å vise eksemplet på excel AND-funksjon.
Her er tilstanden Test 1 Score> = 250 OG Test 2 Score> = 250 .
Siden vi har mer enn en datacelle, må vi bruke sløyfer for å unngå å skrive unødvendige og tidkrevende kodelinjer. Jeg har skrevet koden nedenfor for deg; formel og logikk er det samme. Jeg har brukt "VBA For Next Loop."
Kode:
Sub AND_Example3 () Dim k As Integer For k = 2 til 6 celler (k, 3). Verdi = Cells (k, 1)> = 250 Og celler (k, 2)> = 250 Neste k End Sub
Dette vil gi resultatet nøyaktig det samme som regnearkfunksjonen vår, men vi får ingen formler. Vi får bare resultater.
På denne måten kan vi bruke den OG logiske funksjonen til å teste flere forhold, som alle skal være SANNE for å komme til de ønskede resultatene.
Dette fungerer helt motsatt av OR-funksjonen, der OR krever at en av de leverte forholdene er SANNE for å komme til resultatene, og AND krever 100% resultat i en logisk test for å komme frem til resultatene.
