Exceli VBA ei tööta
Loogilised funktsioonid on kasulikud arvutuste jaoks, mille testimiseks on vaja mitut tingimust või kriteeriumi. Oma varasemates artiklites oleme näinud tingimusi "VBA IF", "VBA OR" ja "VBA AND". Selles artiklis käsitleme Excelis funktsiooni „VBA NOT” IF-funktsiooniga. Selle kõigepealt mõistmiseks peame vaatama funktsiooni "VBA EI".
Näited
Näide 1
Funktsioon EI on saadaval ka VBA-ga ja see töötab täpselt samamoodi nagu Exceli funktsioon. Näiteks vaadake allpool olevat VBA-koodi komplekti.
Kood:
Alam_näide1 () Hämm k stringina k = Ei (45 = 45) MsgBox k Lõpp alam
Ülalolevas koodis oleme deklareerinud muutuja “k” stringina.
Dim k stringina
Järgmisena määrasime väärtuse funktsiooni NOT kaudu. Kas funktsioon Funktsioon ei ütle, kas arv 45 on võrdne 45-ga või mitte?
k = mitte (45 = 45)
Järgmisena määrasime funktsiooni NOT väärtuse return sõnumikasti muutujale “k”.
MsgBox k
Käivitage kood ja vaadake, mis on tulemus.
Näide # 2 - EI funktsiooniga IF
Nagu ma ühes varasemas artiklis ütlesin: "KUI muude loogiliste funktsioonidega on exceli parimad paarid."
Samamoodi on EI IF-iga kasulik mitmel viisil. IF-i korral võivad meil olla TRUE või FALSE vaiketulemuste asemel omad tulemused.
Võtke ülalt sama näite kood ja rakendame EI funktsiooniga IF.
Kood:
Alam_näide2 () Dim k stringina, kui ei ole (45 = 45) Siis k = "Testi tulemus on TÕSI" Muu k = "Testi tulemus on VALE" Lõpeta, kui MsgBox k Lõpeta alam
Ülalolevas koodis oleme muutnud vaiketulemusi valikutest „Testitulemus on VÄÄR” ja „Testi tulemus on TÕSI”. Kui kaasasolev loogiline test vastab tõele, tagastab see „Testi tulemus on VALE” ja kui kaasas olev loogiline test on vale, naaseb see. "Testi tulemus on TÕSI."
Ülaltoodud koodis on meil väärtus 45 = 45, seega saame vastuse järgmiselt.
Näide # 3 - edasijõudnutele EI
Funktsiooni EI saab kõige paremini kasutada funktsiooniga IF. Selle funktsiooni abil saame peita kõik lehed, välja arvatud üks kindel leht.
Meil on mitmesuguseid lehti meie Excelis järgmiselt.
Allpool on näidiskood, et peita kõik lehed, välja arvatud üks kindel leht.
Kood:
Alam EI_näide3 () Hämarda Ws iga W-i jaoks töölehena ActiveWorkbookis. Töölehed, kui ei (Ws.Name = "Andmeleht"), siis Ws.Visible = xlSheetVeryHideen Lõpeta, kui järgmised Ws End
Ülaltoodud kood peidab kõik töölehed, välja arvatud tööleht “Andmeleht”.
Selle VBA-koodi abil saate peita kõik lehed, välja arvatud üks kindel leht, muutes lehe nime oma lehe nimeks.
Nagu ka see, kuidas saame Excelis ka lehed varjata. Allolev kood peidab kõik lehed, välja arvatud lehe nimi „Andmeleht”.
Kood:
Alam EI_näide4 () Hämarda Ws töölehena ActiveWorkbooki iga W-le. Töölehed, kui ei ole (Ws.Name = "Andmeleht"), siis Ws.Visible = xlSheetVisible End, kui järgmised Ws End Sub
Allpool olev kood näitab ainult lehe nime „Andmeleht”.
Kood:
Alam EI_näide3 () Hämarda Ws töölehena ActiveWorkbooki iga W-le. Töölehed, kui ei ole (Ws.Name "Andmeleht"), siis Ws.Visible = xlSheetVisible End, kui järgmine Ws End Sub
