VBA JOS EI | Kuinka käyttää IF & NOT -toimintoa Excel VBA: ssa?

JOS EI VBA: ssa

Loogisista toiminnoista on hyötyä laskelmissa, joiden testaaminen vaatii useita ehtoja tai ehtoja. Aikaisemmissa artikkeleissamme olemme nähneet VBA IF-, VBA OR- ja VBA AND -olosuhteet. Tässä artikkelissa käsitellään "VBA JOS EI" -toimintoa. Ennen kuin esitän VBA EI -toiminnon, haluan näyttää sinulle ensin VBA EI -toiminnon.

Mikä EI toimi VBA: ssa?

"EI" on yksi loogisista toiminnoista, joita meillä on Excelin ja VBA: n kanssa. Kaikki loogiset toiminnot edellyttävät loogisten testien suorittamista ja palauttavat TOSI, jos looginen testi on oikea, jos looginen testi ei ole oikea, se palauttaa FALSE tuloksena.

Mutta "VBA EI" on täysin päinvastainen kuin toinen looginen toiminto. Sanoisin, että tämä on loogisten toimintojen käänteisfunktio.

“VBA NOT” -toiminto palauttaa arvon “FALSE”, jos looginen testi on oikea ja jos looginen testi ei ole oikea, se palauttaa arvon “TOSI”. Katso nyt ”VBA EI” -toiminnon syntaksia.

EI (looginen testi)

Tämä on hyvin yksinkertaista, meidän on toimitettava looginen testi. EI-toiminto arvioi testin ja palauttaa tuloksen.

Esimerkkejä EI & JOS-toiminnosta VBA: ssa?

Alla on esimerkkejä IF- ja EI-funktioiden käytöstä excel VBA: ssa.

Voit ladata tämän VBA JOS EI Excel-mallin täältä - VBA JOS EI Excel-mallin

Esimerkki 1

Katso esimerkki alla olevasta koodista.

Koodi:

 Sub NOT_Example () Dim k As String k = Not (100 = 100) MsgBox k End Sub 

Edellä mainitussa koodissa olen ilmoittanut muuttujan merkkijonoksi.

 Dim k merkkijonona 

Sitten tälle muuttujalle olen määrittänyt NOT-toiminnon loogisella testillä 100 = 100.

k = ei (100 = 100)

Sitten olen kirjoittanut koodin näyttämään tuloksen VBA-viestiruutuun. MsgBox k

Suoritan nyt koodin ja näen tuloksen.

Saimme tuloksen nimellä "FALSE".

Katsokaa nyt taaksepäin loogista testiä. Olemme toimittaneet loogisen testin 100 = 100, joka on yleensä TOSI, koska olimme antaneet NOT-funktion, saimme tuloksen EPÄTOSI. Kuten sanoin, alussa se antaa käänteisiä tuloksia verrattuna muihin loogisiin toimintoihin. Koska 100 on yhtä suuri kuin 100, se on palauttanut tuloksen epätosi.

Esimerkki 2

Katso nyt vielä yksi esimerkki eri numeroilla.

Koodi:

 Sub NOT_Example () Dim k As String k = Not (85 = 148) MsgBox k End Sub 

Koodi on sama ainoa asia, jonka olen muuttanut tässä: Olen muuttanut loogisen testin arvosta 100 = 100 arvoon 85 = 148.

Nyt aion suorittaa koodin ja nähdä, mitä tulos on.

Tällä kertaa saimme tuloksen TOSI. Tutki nyt loogista testiä.

k = ei (85 = 148)

Me kaikki tiedämme, että 85 ei ole yhtä suuri kuin luku 148. Koska funktio EI ole yhtä suuri, EI-funktio on palauttanut tuloksen TOSI-arvon.

EI IF-ehdon kanssa:

Excelissä tai VBA: ssa kaikki loogiset ehdot eivät ole täydellisiä ilman yhdistelmä IF -ehtoa. IF: n käyttäminen excel-tilassa voi tehdä paljon enemmän asioita kuin TOSI tai EPÄTOSI. Esimerkiksi edellä olevista esimerkeistä saimme oletusarvot FALSE & TRUE, sen sijaan, että voimme muokata tulosta omin sanoin.

Katso alla oleva koodi.

Koodi:

 Alamerkki_esimerkki2 () Himmennettävä numero1 merkkijonona Himmennettävä numero2 merkkijonona1 = 100 Luku2 = 100 Jos ei (Luku1 = Luku2), niin MsgBox "Luku 1 ei ole yhtä suuri kuin Luku 2" Muu MsgBox "Luku 1 on yhtä suuri kuin Luku 2" Loppu jos " End Sub 

Olen ilmoittanut kaksi muuttujaa.

 Himmennetty numero1 merkkijonona ja himmeä numero2 merkkijonona 

Näille kahdelle muuttujalle olen määrittänyt numeroiksi vastaavasti 100 ja 100.

Luku1 = 100 ja luku2 = 100

Sitten EI-toiminnolle olen liittänyt JOS-ehdon muuttamaan oletusarvoista TOSI tai EPÄTOSI. Jos NOT-toiminnon tulos on TOSI, tulos on seuraava.

MsgBox "Numero 1 ei ole sama kuin numero 2"

Jos NOT-toiminnon tulos on EPÄTOSI, tulos on seuraava.

MsgBox "Numero 1 on yhtä suuri kuin numero 2"

Suoritan nyt koodin ja näen mitä tapahtuu.

Saimme tuloksen, koska "Numero 1 on yhtä suuri kuin numero 2", joten EI-funktio on palauttanut FALSE-tuloksen JOS-ehtoon, joten JOS-tila palautti tämän tuloksen.

Tällä tavoin voimme käyttää IF-ehtoa käänteisen testin suorittamiseen.


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