Excel VBA ikke-funksjon
Logiske funksjoner er nyttige for beregningene som krever flere forhold eller kriterier for å teste. I våre tidligere artikler har vi sett "VBA IF", "VBA OR" og "VBA AND" forhold. I denne artikkelen vil vi diskutere “VBA NOT” med IF-funksjonen i excel. For å forstå det først, må vi se på “VBA NOT” -funksjonen.
Eksempler
Eksempel 1
NOT-funksjonen er også tilgjengelig med VBA, og den fungerer nøyaktig den samme som excel-funksjonen. Se for eksempel på settet nedenfor med VBA-kode.
Kode:
Sub NOT_Example1 () Dim k As String k = Not (45 = 45) MsgBox k End Sub
I koden ovenfor har vi erklært variabelen “k” som en streng.
Dim k As String
Deretter har vi tilordnet verdien gjennom IKKE-funksjonen. Sier IKKE Funksjon om tallet 45 er lik 45 eller ikke?
k = Ikke (45 = 45)
Deretter har vi tildelt verdien return av NOT-funksjonen til variabelen “k” i meldingsboksen.
MsgBox k
Kjør koden og se hva resultatet er.
Eksempel 2 - IKKE med IF-funksjon
Som jeg fortalte i en av de tidligere artiklene, "IF med andre logiske funksjoner er de beste parene i excel."
På samme måte er IKKE med IF nyttig på mange måter. Med IF kan vi ha våre egne resultater i stedet for standardresultatene TRUE eller FALSE.
Ta den samme eksempelkoden ovenfra, så bruker vi IKKE med IF-funksjonen.
Kode:
Sub NOT_Example2 () Dim k As String If Not (45 = 45) Then k = "Test result is TRUE" Else k = "Test result is FALSE" End If MsgBox k End Sub
I koden ovenfor har vi endret standardresultatene fra "Testresultat er FALSK" og "Testresultat er SANT." Hvis den medfølgende logiske testen er sann, vil den returnere "Testresultatet er FALSE", og hvis den medfølgende logiske testen er falsk, vil den returnere. "Testresultatet er SANT."
I koden ovenfor har vi verdien 45 = 45, så vi får svaret som følger.
Eksempel 3 - Avansert IKKE
IKKE-funksjonen brukes best med IF-funksjonen. Vi kan bruke denne funksjonen til å skjule alle arkene bortsett fra det ene arket.
Vi har forskjellige ark, som følger i vårt excel.
Nedenfor er eksempelkoden for å skjule alle arkene unntatt ett bestemt ark.
Kode:
Sub NOT_Example3 () Dim Ws som regneark for hvert Ws i ActiveWorkbook.Worksheets Hvis ikke (Ws.Name = "Data Sheet") Så Ws.Visible = xlSheetVeryHideen Slutt hvis neste Ws End Sub
Ovennevnte kode skjuler alle regnearkene unntatt regnearket "Dataark."
Du kan bruke denne VBA-koden til å skjule alle arkene bortsett fra det ene arket ved å endre arknavnet til arknavnet ditt.
Som hvordan vi også kan skjule ark i excel også. Koden nedenfor viser alle arkene unntatt arknavnet "Dataark".
Kode:
Sub NOT_Example4 () Dim Ws som regneark for hvert Ws i ActiveWorkbook.Worksheets Hvis ikke (Ws.Name = "Data Sheet") Så Ws.Visible = xlSheetVisible End Hvis neste Ws End Sub
Koden nedenfor viser bare arknavnet "Dataark".
Kode:
Sub NOT_Example3 () Dim Ws som regneark for hvert Ws i ActiveWorkbook.Worksheets Hvis ikke (Ws.Name "Data Sheet") Så Ws.Visible = xlSheetVisible End Hvis neste Ws End Sub
