Excel VBA IsDate-funksjon
IsDate er VBA-funksjonen som tester om den gitte verdien er datoen eller ikke. Hvis den oppgitte verdien eller referanseverdien for området er datoverdi, vil vi få resultatet som "SANT". Hvis verdien ikke er datoverdi, vil vi få resultatet som "FALSE". Så resultatet er BOOLEAN-verdi, dvs. enten SANT eller FALSK.
Nedenfor er syntaksen til IsDate-funksjonen.
Uttrykket er ingenting annet enn verdien vi prøver å teste, enten det er datoen eller ikke.
Hvordan bruke VBA IsDate-funksjonen?
Vi vil teste om verdien “5.01.19” er en datoverdi eller ikke.
For denne første starten, Excel-makroprosedyren.
Kode:
Sub IsDate_Example1 () Slutt Sub
Definer variabelen for å lagre datoverdien, og siden verdien vil være datoverdi, tildeler du datatypen bare som "Dato".
Kode:
Sub IsDate_Example1 () Dim MyDate as Date End Sub
Nå tilordner verdien “5.1.19” til variabelen “MyDate.”
Kode:
Sub IsDate_Example1 () Dim MyDate As Date MyDate = "5.1.19" Slutt Sub
Åpne meldingsboksen i VBA nå.
Kode:
Sub IsDate_Example1 () Dim MyDate As Date MyDate = "5.1.19" MsgBox (End Sub
I denne meldingsboksen vil vi teste om den leverte datoverdien til variabelen “MyDate” er datoen eller ikke ved å bruke “IsDate” -funksjonen. Åpne først “IsDate” -funksjonen.
Kode:
Sub IsDate_Example1 () Dim MyDate As Date MyDate = "5.1.19" MsgBox IsDate (End Sub
Uttrykket er verdien vi tester for å finne ut om det er dato eller ikke. Siden vi allerede har lagret verdien til variabelen “MyDate”, må du bare oppgi variabelnavnet.
Kode:
Sub IsDate_Example1 () Dim MyDate As Date MyDate = "5.1.19" MsgBox IsDate (MyDate) End Sub
Ok, kjør nå koden og se hva vi får i meldingsboksen.
Wow !!! Resultatet er SANT .
Du må lure på hvordan den anerkjente verdien “5.1.19” som datoen.
Årsaken til at det har returnert resultatet som SANT, for når du ser på den gitte verdien "5.1.19" , er det kortformen for datoen "05.01.2019", så excel er strålende nok til å gjenkjenne det som dato, så resultatet er SANT.
Nå kommer den vanskelige tingen, for den samme verdien. Det vi skal gjøre er at vi vil endre årets korte form fra 19 til 2019.
Kode:
Sub IsDate_Example1 () Dim MyDate As String MyDate = "5.1.2019" MsgBox IsDate (MyDate) End Sub
Kjør nå koden og se resultatet.
Denne gangen har den returnert resultatet som FALSE fordi "dag og måned" -delen av datoen er i kort form, men årsdelen er i full form av "ÅÅÅÅ", så ISDATE kan ikke gjenkjenne at den har en dato, så resultatet er FALSK.
Nå, se på koden nedenfor.
Kode:
Sub IsDate_Example1 () Dim MyDate As String MyDate = "05.01.2019" MsgBox IsDate (MyDate) End Sub
Jeg har nevnt en hel dag og en hel måned format ved å bruke 0. La oss kjøre koden og se resultatet av IsDate-funksjonen.
Denne gangen har vi også fått resultatet som FALSE .
Endre nå koden som følger.
Kode:
Sub IsDate_Example1 () Dim MyDate As String MyDate = "05/01/2019" MsgBox IsDate (MyDate) End Sub
I stedet for prikken (.) Som skilletegn, har vi angitt skråstrek (/) som skilletegn. Kjør nå koden og se resultatet.
Denne gangen fikk vi resultatet som SANT .
Dette er grunnen til at jeg i begynnelsen av artikkelen har fortalt deg at "Date" er en følsom ting.
Nå, det jeg skal gjøre er at jeg vil slå sammen dato og tid sammen.
Kode:
Sub IsDate_Example1 () Dim MyDate As String MyDate = "05/01/2019 15:26:24" MsgBox IsDate (MyDate) End Sub
Det jeg har lagt til ovenfor er tidsdelen av “15:26:24” foran datoen. Kjør nå koden og se resultatet.
Også denne gangen fikk vi resultatet som SANT fordi DATO & TID i Excel er de samme tingene og lagret som serienumre. Hele tallet representerer datodelen, og desimaler representerer tidsdelen.
Ting å huske her
- IsDate returnerer det boolske resultatet, dvs. enten SANT eller FALSK.
- IsDate er bare tilgjengelig som en VBA-funksjon.
- Bare gyldige formaterte datoer behandles som datoen, ellers vil den behandles som tekstverdier og returnere resultatet som FALSE.
