Excel VBA IsDate függvény
Az IsDate az a VBA függvény, amely teszteli, hogy az adott érték a dátum-e vagy sem. Ha a megadott érték vagy tartomány referenciaérték dátumérték, akkor az eredményt „IGAZ” -ként kapjuk meg, ha az érték nem dátumérték, akkor az eredményt „FALSE” -ként kapjuk meg. Tehát az eredmény BOOLEAN érték, azaz IGAZ vagy HAMIS.
Az alábbiakban látható az IsDate függvény szintaxisa.
A kifejezés nem más, mint az az érték, amelyet megpróbálunk tesztelni, függetlenül attól, hogy ez a dátum vagy sem.
Hogyan kell használni a VBA IsDate függvényt?
Megvizsgáljuk, hogy az „5.01.19” érték dátum-e vagy sem.
Ehhez az első indításhoz az excel makró eljárás.
Kód:
Sub IsDate_Example1 () End Sub
Adja meg a változót a dátumérték tárolásához, és mivel az érték dátumérték lesz, az adattípust csak „Dátumként” rendelje hozzá.
Kód:
Sub IsDate_Example1 () Dim MyDate mint Date End Sub
Most rendelje hozzá az „5.1.19” értéket a „MyDate” változóhoz.
Kód:
Sub IsDate_Example1 () Dim MyDate as Date MyDate = "5.1.19" End Sub
Nyissa meg most az üzenetmezőt a VBA-ban.
Kód:
Sub IsDate_Example1 () Dim MyDate mint Date MyDate = "5.1.19" MsgBox (End Sub
Ebben az üzenetmezőben az „IsDate” függvény segítségével teszteljük, hogy a „MyDate” változóhoz megadott dátumérték-e a dátum, vagy sem. Először nyissa meg az „IsDate” funkciót.
Kód:
Sub IsDate_Example1 () Dim MyDate mint Date MyDate = "5.1.19" MsgBox IsDate (End Sub
A kifejezés az az érték, amelyet tesztelünk annak megállapítására, hogy dátum-e vagy sem. Mivel már elmentettük az értéket a „MyDate” változóba, csak a változó nevét adjuk meg.
Kód:
Sub IsDate_Example1 () Dim MyDate mint Date MyDate = "5.1.19" MsgBox IsDate (MyDate) End Sub
Ok, most futtassa a kódot, és nézze meg, mit kapunk az üzenet mezőben.
Azta!!! Az eredmény IGAZ .
Kíváncsi lehet arra, hogyan ismerte fel az „5.1.19” értéket dátumként.
Az ok, amiért az eredményt IGAZként adta vissza, mert ha megnézzük az adott „5.1.19” értéket, akkor ez a „2019.01.05.” Dátum rövid alakja , így az Excel elég ragyogó ahhoz, hogy dátumként ismerje el, tehát az eredmény IGAZ.
Most jön a trükkös dolog, ugyanazért az értékért, amit tenni fogunk, az az, hogy az év rövid formáját 19-ről 2019-re változtatjuk.
Kód:
Sub IsDate_Example1 () Dim MyDate mint karakterlánc MyDate = "2015.1.5." MsgBox IsDate (MyDate) End Sub
Most futtassa a kódot, és nézze meg az eredményt.
Ezúttal HAMISként adta vissza az eredményt, mert a dátum „nap és hónap” része rövid, de az évrész teljes formában „ÉÉÉÉ”, így az ISDATE nem tudja felismerni, hogy van dátuma, így az eredmény hamis.
Most nézze meg az alábbi kódot.
Kód:
Sub IsDate_Example1 () Dim MyDate mint karakterlánc MyDate = "05.01.2019" MsgBox IsDate (MyDate) End Sub
A 0 használatával megemlítettem egy teljes napos és egy hónapos formátumot. Futtassuk a kódot, és nézzük meg az IsDate függvény eredményét.
Ezúttal is FALSE kaptuk az eredményt .
Most módosítsa a kódot az alábbiak szerint.
Kód:
Sub IsDate_Example1 () Dim MyDate mint karakterlánc MyDate = "2019.01.05." MsgBox IsDate (MyDate) End Sub
Az elválasztó pont (.) Helyett elválasztóként előre-perjelet (/) írtunk be. Most futtassa a kódot, és nézze meg az eredményt.
Ezúttal kapunk az eredményt IGAZ .
Ezért mondtam neked a cikk elején, hogy a „Dátum” érzékeny dolog.
Most azt fogom tenni, hogy összeolvasztom a dátumot és az időt.
Kód:
Sub IsDate_Example1 () Dim MyDate mint karakterlánc MyDate = "2019.05.01. 15:26:24" MsgBox IsDate (MyDate) End Sub
Amit fentebb hozzáfűztem, a dátum előtti „15:26:24” időrész. Most futtassa a kódot, és nézze meg az eredményt.
Ezúttal is IGAZ lett az eredmény, mert az Excelben a DÁTUM ÉS IDŐ ugyanazok a dolgok, és sorozatszámként vannak tárolva. Az egész szám a dátumrészt, a tizedesjegy pedig az időrészt jelenti.
Emlékezetes dolgok itt
- Az IsDate a logikai típusú eredményt adja vissza, azaz IGAZ vagy HAMIS.
- Az IsDate csak VBA funkcióként érhető el.
- Csak az érvényes formázott dátumokat tekintjük dátumnak, különben szöveges értékekként kezelik, és az eredményt HAMISként adja vissza.
