VBA ARBA funkcija (pavyzdžiai) Kaip naudoti ARBA loginį operatorių VBA?

Arba yra loginė funkcija bet kurioje programavimo kalboje ir panaši į VBA, mes turime ARBA funkciją, nes tai yra loginė funkcija, kurios rezultatas yra teisingas arba klaidingas, ši funkcija naudojama dviem ar daugeliui sąlygų kartu ir suteikia tikras rezultatas, kai bet kuri iš sąlygų grąžinama kaip teisinga.

Kas yra ARBA funkcija VBA?

„Excel“ loginėse funkcijose yra formulių, kurias naudojame kasdien, esmė. Loginės funkcijos yra skirtos atlikti loginį testą ir duoda rezultatą Bulio logikos duomenų tipui, ty TRUE arba FALSE. Kai kurios loginės formulės programoje „Excel“ yra „IF, IFERROR excel, ISERROR excel“ AND OR OR excel funkcija “. Tikiuosi, kad jūs juos gana dažnai naudojote kaip darbalapio funkciją. VBA taip pat galime naudoti juos visus ir šiame straipsnyje paaiškinsime jums funkcijos „VBA OR“ naudojimo būdus.

Kas pirmiausia kyla jums galvojant apie žodį „ARBA“?

Paprasčiau tariant „OR“ reiškia „arba tas, ir tas“

Pagal tą pačią idėją OR yra loginė funkcija, suteikianti rezultatą TIKRĄ, jei kuris nors iš loginių testų yra TIESA, ir pateikia NETIESĄ kaip rezultatą, jei nė vienas iš loginių testų nėra TIESA.

Tai veikia visiškai priešingai nei VBA IR funkcija. Funkcija AND grąžina TIKRĄ tik tuo atveju, jei visos loginės sąlygos yra TIKROS, jei kuri nors iš sąlygų nėra įvykdyta, rezultatas bus NETIESA.

VBA arba funkcijos formulė

Leiskite parengti sintaksę, kad suprastumėte funkciją.

[Loginis testas] ARBA [Loginis testas] ARBA [Loginis testas]

Pirmiausia turime paminėti, kas yra loginis testas, tada paminėti žodį ARBA, tada paminėti, kas yra antrasis loginis testas. Jei norite atlikti logiškesnį testą, paminėkite žodį OR, išbraukę loginį testą.

Neįtraukite visų jūsų atliktų loginių testų, jei kas nors iš testų yra patenkintas ar teisingas, rezultatą gausime kaip TIKRĄ, jei nė vienas iš jų nebus patenkintas, arba rezultatas bus neteisingas.

ARBA funkcijos naudojimo VBA pavyzdžiai

Parodysime jums paprastą OR funkcijos VBA pavyzdį.

Šį VBA ARBA „Excel“ šabloną galite atsisiųsti čia - VBA ARBA „Excel“ šablonas

Norėdami suprasti loginę VBA funkciją ARBA leiskite man pateikti jums pavyzdį. Tarkime, norime atlikti loginį testą, ar skaičius 25 yra didesnis nei 20, ar skaičius 50 yra mažesnis nei 30.

1 veiksmas: sukurkite makrokomandos pavadinimą.

2 žingsnis: Apibrėžkite kintamąjį kaip eilutę.

Kodas:

 Sub OR_Pavyzdys1 () Dim i kaip eilutės pabaiga Sub 

3 žingsnis: Dabar šiam kintamajam reikšmę priskirsime atlikdami loginį ARBA testą.

Kodas:

 Sub OR_Pavyzdys1 () Dim i As String i = End Sub 

4 žingsnis: mūsų pirmasis loginis testas yra 25> 20 .

Kodas:

 Sub OR_Pavyzdys1 () Dim i kaip eilutė i = 25> 20 Pabaiga Sub 

5 žingsnis: Dabar po pirmojo loginio testo paminėkite žodį OR ir įveskite antrąjį loginį testą.

Kodas:

 Sub OR_Pavyzdys1 () Dim i kaip eilutė i = 25> 20 arba 50 <30 Pabaiga Sub 

6 žingsnis: Gerai, dabar VBA OR funkcija patikrina, ar loginiai testai yra TIESA, ar NETIESA. Dabar priskirkite kintamojo rezultatą VBA pranešimų laukelyje .

Kodas:

 OR_pavyzdys1 () Dim i kaip eilutė i = 25> 20 arba 50 <30 MsgBox i Pabaiga Sub 

7 žingsnis: paleiskite makrokomandą ir koks yra rezultatas.

Rezultatą gavome kaip TIKRĄ, nes iš dviejų pateiktų loginių testų vienas testas yra TIKRAS, taigi rezultatas TIESA.

25 yra didesnis nei 20, o 50 yra ne mažesnis kaip 30, šiuo atveju pirmasis loginis testas yra TIESA, bet antrasis - NETIESA. Kadangi mes pritaikėme funkciją VBA OR, jai reikia bet kurios iš sąlygų, kad būtų TIKRA, kad rezultatas būtų TIKRA.

Dabar pažvelkite į žemiau pateiktą kodą.

Kodas:

 OR_pavyzdys1 () Dim i kaip eilutė i = 25 = 20 Arba 50 = 30 MsgBox i Pabaiga Sub 

Aš pakeitiau loginio testo lygtis iš> ir <į lygią (=) ženklą. Rezultatas bus FALSE, nes 25 nėra lygus 20, o 50 nėra lygus 30.

VBA ARBA funkcija su sąlyga yra galinga

Kaip sakiau, ARBA gali pateikti TRUE arba FALSE kaip rezultatą, tačiau naudodamiesi kita logine funkcija „IF“, mes galime manipuliuoti rezultatais pagal savo poreikius.

Atlikite tuos pačius loginius testus iš viršaus, ARBA grąžino tik TRUE arba FALSE, bet derinkime šį OR su IF.

1 veiksmas: prieš atlikdami bet kokį bandymą atidarykite funkciją IF .

Kodas:

 Sub OR_Pavyzdys2 () Dim i kaip eilutė IF Pabaiga 

2 žingsnis: Dabar atlikite bandymus naudodami OR funkciją.

Kodas:

 Sub OR_Pavyzdys2 () Dim i kaip eilutė IF 25 = 20 Arba 50 = 30 Pabaiga Sub 

3 žingsnis: įdėkite žodį „Tada“ ir užrašykite rezultatą, jei sąlyga yra TIESA, priskirkite kintamajam vertę kaip „Sąlyga yra patenkinta“ .

Kodas:

 OR_Pavyzdys2 () Dim i kaip eilutė, jei 25 = 20 arba 50 = 30, tada i = "Sąlyga patenkinta" Pabaiga Sub 

4 žingsnis: Jei sąlyga yra NETIESA, mums reikia kitokio rezultato, todėl įdėkite žodį „KITA“ ir kitoje eilutėje priskirkite reikšmę kintamajam „koks turėtų būti rezultatas, jei sąlyga ar loginis testas yra NETIESA“.

Kodas:

 OR_pavyzdys2 () Dim i kaip eilutė, jei 25 = 20 arba 50 = 30, tada i = "Sąlyga yra patenkinta" Kita i = "Sąlyga nėra patenkinta" Pabaiga Sub 

5 žingsnis: Užbaikite IF funkciją žodžiu „End If“ .

Kodas:

 OR_pavyzdys2 () Dim i kaip eilutė, jei 25 = 20 arba 50 = 30, tada i = "Sąlyga yra patenkinta" Kita i = "Sąlyga nėra patenkinta" Pabaiga, jei pabaiga Pabaiga 

6 veiksmas: priskirkite kintamojo rezultato vertę pranešimo laukelyje .

Kodas:

 OR_pavyzdys2 () Dim i kaip eilutė, jei 25 = 20 arba 50 = 30, tada i = "Sąlyga yra patenkinta" Kita i = "Sąlyga nėra patenkinta" Pabaiga, jei MsgBox i Pabaiga Sub 

Vykdykite makrokomandą, jei loginis testas yra TIKRAS, rezultatą gausime kaip „Sąlyga yra patenkinta“, arba gausime „Sąlyga nėra patenkinta“.

Rezultatą gavome kaip „Sąlyga nėra patenkinta“, nes abu loginiai testai yra NETIESA.

Dabar pakeisiu loginius testus.

Kodas:

 OR_pavyzdys2 () Dim i kaip eilutė, jei 25> 20 arba 50 <30, tada i = "Sąlyga yra patenkinta" Kita i = "Sąlyga nėra patenkinta" Pabaiga, jei MsgBox i Pabaiga Sub 

Paleisiu makrokomandą ir pažiūrėsiu, koks rezultatas.

Mes galime naudoti vieną loginę funkciją su kitomis loginėmis funkcijomis, kad gautume rezultatus.

Išspręskite žemiau pateiktą atvejo analizę, kad įprastumėte prie loginių funkcijų.

Atvejo analizė, kurią reikia išspręsti

Turiu darbuotojų vardus ir pavardes ir jų skyrius.

Jei bandėte ir neradote rezultato, galite nurodyti žemiau esantį kodą, kad suprastumėte logiką.

Kodas:

 Sub premijos_skaičiavimas () „Dim i As Long“ už i = 2–10 „If“ langelių (i, 2). Vertė = „Finansai“ arba „Cell“ (i, 2). Vertė = „IT“ Tada ląstelės (i, 3). Vertė = 5000 kitų ląstelių (i, 3). Vertė = 1000 pabaiga, jei kita i pabaiga 

Jei darbuotojas yra iš finansų ar IT, jis turėtų gauti premiją kaip „5000“. Kitiems skyriaus darbuotojams premija yra „1000“.

Atlikite loginį testą ir pasiekite rezultatus.


$config[zx-auto] not found$config[zx-overlay] not found