VBA või funktsioon (näited) Kuidas VBA-s VÕI loogilist operaatorit kasutada?

Lang L: none (table-of-contents)

Või on loogiline funktsioon mis tahes programmeerimiskeeles ja sarnane VBA-s on meil funktsioon OR tõene tulemus, kui kumbki tingimus on täidetud.

Mis on VBA funktsioon VBA-s?

Excelis on loogilised funktsioonid igapäevaselt kasutatavate valemite keskmes. Loogilised funktsioonid on loogilise testi läbiviimiseks ja annavad tulemuseks Boole'i ​​andmetüübi, st kas TRUE või FALSE. Mõned Exceli loogilised valemid on „IF, IFERROR excelis, ISERROR excelis ja VÕI exceli funktsioon”. Loodan, et olete neid töölehe funktsioonina üsna sageli kasutanud. Ka VBA-s võime neid kõiki kasutada ja selles artiklis selgitame teile funktsiooni „VBA OR” kasutamise viise.

Mis on esimene asi, mis pähe tuleb, kui mõelda sõnale „VÕI“?

Lihtsamalt öeldes tähendab OR” “kas seda või seda”

Sama idee korral on OR loogiline funktsioon, mis annab tulemuseks TÕENE, kui mõni loogilistest testidest on TÕSI, ja annab tulemuseks FALSE, kui ükski loogilistest testidest pole TÕSI.

See töötab täpselt VBA JA funktsiooni vastandina. Funktsioon AND tagastab TÕENE ainult siis, kui kõik loogilised tingimused on tõesed. Kui keegi tingimustest ei ole täidetud, siis saame selle tulemusel VALE.

VBA või funktsiooni valem

Lubage mul koostada süntaks, et saaksite funktsiooni mõista.

(Loogiline test) VÕI (Loogiline test) VÕI (Loogiline test)

Esiteks peame mainima, mis on loogiline test, seejärel mainima sõna OR, seejärel mainima, mis on teine ​​loogiline test. Kui soovite läbi viia loogilisema testi, siis mainige pärast loogilise testi tühistamist sõna VÕI.

Kõigist teie tehtud loogilistest testidest, kui keegi testidest on rahul või vastab tõele, siis saame tulemuseks TÕENE, kui ükski neist pole täidetud või siis on tulemus vale.

Näited funktsiooni VBA kasutamisest VBA-s

Näitame teile lihtsat näidet funktsiooni OR kasutamisest VBA-s.

Loogilise VBA funktsiooni mõistmiseks VÕI lubage mul tuua teile näide. Oletame, et tahame läbi viia loogilise testi, kas arv 25 on suurem kui 20 või arv 50 on väiksem kui 30.

1. samm: looge makro nimi.

2. samm: määratlege muutuja stringina.

Kood:

Sub OR_Näide1 () Dim i String End Sub

3. samm: määrame selle muutuja jaoks väärtuse loogilise testi kaudu OR.

Kood:

Sub OR_Näide1 () Dim i stringina i = Sub Sub

4. samm: meie esimene loogiline test on 25> 20 .

Kood:

Alam OR_näide1 () Dim i stringina i = 25> 20 Lõpp alam

5. samm: mainige nüüd pärast esimest loogilist testi sõna OR ja sisestage teine ​​loogiline test.

Kood:

Alam OR_näide1 () Dim i stringina i = 25> 20 või 50 <30 Lõpp-alam

6. samm: Ok, nüüd testib funktsioon VBA OR, kas loogilised testid on TÕENE või VALE. Nüüd määrake muutuja tulemus VBA teatekasti .

Kood:

Sub OR_Näide1 () Dim i stringina i = 25> 20 või 50 <30 MsgBox i End Sub

7. samm: käivitage makro ja milline on selle tulemus.

Tulemuseks saime TÕENE, kuna kahest meie esitatud loogilisest testist on üks TÕSI, nii et tulemus on TÕSI.

25 on suurem kui 20 ja 50 pole väiksem kui 30. Sel juhul on esimene loogiline test TÕENE, kuid teine ​​VÄÄR. Kuna oleme rakendanud funktsiooni VBA OR, vajab see tulemuse tõeks saamiseks mis tahes üht tingimust TÕENE.

Nüüd vaadake allolevat koodi.

Kood:

Sub OR_Näide1 () Dim i stringina i = 25 = 20 Või 50 = 30 MsgBox i Lõpp Sub

Mul on loogiliste testide võrrandid> ja <muutunud võrdseks (=) märgiks. See tagastab tulemuseks FALSE, kuna 25 ei ole võrdne 20-ga ja 50 pole võrdne 30-ga.

VBA või funktsioon, kui konditsioneer on võimas

Nagu ma ütlesin, võib OR tulemuseks tuua kas TÕENE või VALE, kuid teise loogilise funktsiooniga „KUI“ saame tulemusi manipuleerida vastavalt meie vajadustele.

Tehke samad loogilised testid ülalt, OR on tagastanud ainult TRUE või FALSE, kuid kombineerime selle OR IF-ga.

1. samm: enne testi sooritamist avage funktsioon IF .

Kood:

Sub OR_Näide2 () Dim i stringina IF End Sub

2. samm: tehke nüüd testid OR- funktsiooni abil.

Kood:

Sub OR_Näide2 () Dim i stringina IF 25 = 20 Või 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

Kui töötaja on pärit finantsist või IT-st, peaks ta saama preemia kui 5000. Teiste osakonna töötajate jaoks on preemia “1000”.

Viige läbi loogiline test ja jõudke tulemusteni.

Huvitavad Artiklid...