Funcția Excel VBA IsDate
IsDate este funcția VBA care testează dacă valoarea dată este sau nu data. Dacă valoarea furnizată sau valoarea de referință a intervalului este valoarea datei, atunci vom obține rezultatul ca „ADEVĂRAT”, dacă valoarea nu este valoarea datei, vom obține rezultatul ca „FALS”. Deci, rezultatul este valoarea BOOLEAN, adică fie ADEVĂRAT, fie FALS.
Mai jos este sintaxa funcției IsDate.
Expresia nu este altceva decât valoarea pe care încercăm să o testăm, indiferent dacă este sau nu data.
Cum se utilizează funcția VBA IsDate?
Vom testa dacă valoarea „5.01.19” este sau nu o dată.
Pentru acest prim început, procedura macro excel.
Cod:
Sub IsDate_Example1 () End Sub
Definiți variabila pentru a stoca valoarea datei și, deoarece valoarea va fi valoarea datei, atribuiți tipul de date numai ca „Data”.
Cod:
Sub IsDate_Example1 () Dim MyDate as Date End Sub
Acum atribuiți valoarea „5.1.19” variabilei „Data mea”.
Cod:
Sub IsDate_Example1 () Dim MyDate as Date MyDate = "5.1.19" End Sub
Deschideți caseta de mesaje în VBA acum.
Cod:
Sub IsDate_Example1 () Dim MyDate as Date MyDate = "5.1.19" MsgBox (End Sub
În această casetă de mesaj, vom testa dacă valoarea datei furnizate variabilei „Data mea” este sau nu data utilizând funcția „IsDate”. Mai întâi, deschideți funcția „IsDate”.
Cod:
Sub IsDate_Example1 () Dim MyDate as Date MyDate = "5.1.19" MsgBox IsDate (End Sub
Expresia este valoarea pe care o testăm pentru a afla dacă este Data sau nu. Deoarece am stocat deja valoarea variabilei „Data mea”, furnizați numai numele variabilei.
Cod:
Sub IsDate_Example1 () Dim MyDate as Date MyDate = "5.1.19" MsgBox IsDate (MyDate) End Sub
Ok, acum rulează codul și vezi ce primim în caseta de mesaje.
Wow!!! Rezultatul este ADEVĂRAT .
Trebuie să vă întrebați cum a recunoscut valoarea „5.1.19” ca dată.
Motivul pentru care a returnat rezultatul ca fiind ADEVĂRAT, deoarece atunci când te uiți la valoarea dată „5.1.19” , este forma scurtă a datei „05.01.2019”, deci Excel este suficient de strălucitor pentru a-l recunoaște ca dată, deci rezultatul este ADEVĂRAT.
Acum, aici vine lucrul dificil, pentru aceeași valoare, ceea ce vom face este că vom schimba forma scurtă a anului de la 19 la 2019.
Cod:
Sub IsDate_Example1 () Dim MyDate As String MyDate = "5.1.2019" MsgBox IsDate (MyDate) End Sub
Acum rulați codul și vedeți rezultatul.
De data aceasta a returnat rezultatul ca FALS, deoarece porțiunea „zi și lună” a datei este într-o formă scurtă, dar partea din an este în formă completă „AAAA”, deci ISDATE nu poate recunoaște că are o dată, astfel încât rezultatul este FALS.
Acum, uitați-vă la codul de mai jos.
Cod:
Sub IsDate_Example1 () Dim MyDate As String MyDate = "05.01.2019" MsgBox IsDate (MyDate) End Sub
Am menționat un format de zi întreagă și lună întreagă folosind 0. Să rulăm codul și să vedem rezultatul funcției IsDate.
De data aceasta, de asemenea, am obținut rezultatul ca FALS .
Acum schimbați codul după cum urmează.
Cod:
Sub IsDate_Example1 () Dim MyDate As String MyDate = "05/01/2019" MsgBox IsDate (MyDate) End Sub
În loc de punct (.) Ca separator, am introdus forward-slash (/) ca separator. Acum rulați codul și vedeți rezultatul.
De data aceasta am obținut rezultatul ca fiind ADEVĂRAT .
Acesta este motivul pentru care v-am spus la începutul articolului că „Data” este un lucru sensibil.
Acum ceea ce voi face este că voi combina data și ora împreună.
Cod:
Sub IsDate_Example1 () Dim MyDate as String MyDate = "05/01/2019 15:26:24" MsgBox IsDate (MyDate) End Sub
Ceea ce am adăugat mai sus este porțiunea de timp „15:26:24” din fața datei. Acum rulați codul și vedeți rezultatul.
Și de această dată, am obținut rezultatul ca fiind ADEVĂRAT deoarece DATE ȘI ORA în Excel sunt aceleași lucruri și sunt stocate ca numere de serie. Numărul întreg reprezintă porțiunea de dată, iar zecimale reprezintă porțiunea de timp.
Lucruri de reținut aici
- IsDate returnează rezultatul de tip boolean, adică TRUE sau FALSE.
- IsDate este disponibil numai ca funcție VBA.
- Numai datele valide formatate sunt tratate ca dată, altfel va fi tratată ca valori text și va returna rezultatul ca FALS.
