Excel VBA IsDate funkcija
IsDate ir VBA funkcija, kas pārbauda, vai norādītā vērtība ir datums. Ja norādītā vērtība vai diapazona atsauces vērtība ir datuma vērtība, tad rezultātu iegūsim kā “TRUE”, ja vērtība nav datuma vērtība, rezultātu mēs iegūsim kā “FALSE”. Tātad rezultāts ir BOOLEAN vērtība, ti, TRUE vai FALSE.
Zemāk ir funkcijas IsDate sintakse.
Izteiksme ir nekas cits kā vērtība, kuru mēs cenšamies pārbaudīt, neatkarīgi no tā, vai tas ir datums vai nē.
Kā izmantot VBA IsDate funkciju?
Mēs pārbaudīsim, vai vērtība “5.01.19” ir datuma vērtība vai nē.
Šim pirmajam startam Excel makro procedūra.
Kods:
Sub IsDate_Example1 () Beigas Sub
Definējiet mainīgo, lai saglabātu datuma vērtību, un, tā kā vērtība būs datuma vērtība, piešķiriet datu tipam tikai “Datums”.
Kods:
Sub IsDate_Example1 () Dim MyDate kā Date End Sub
Tagad piešķiriet “5.1.19” vērtību mainīgajam “MyDate”.
Kods:
Sub IsDate_Example1 () Dim MyDate As Date MyDate = "5.1.19" Beigas Sub
Atveriet ziņojumu lodziņu VBA tūlīt.
Kods:
Sub IsDate_Example1 () Dim MyDate kā Date MyDate = "5.1.19" MsgBox (End Sub
Šajā ziņojumu lodziņā mēs pārbaudīsim, vai mainīgā “MyDate” norādītā datuma vērtība ir datums, vai nē, izmantojot funkciju “IsDate”. Vispirms atveriet funkciju “IsDate”.
Kods:
Sub IsDate_Example1 () Dim MyDate As Date MyDate = "5.1.19" MsgBox IsDate (End Sub
Izteiksme ir vērtība, kuru mēs pārbaudām, lai noskaidrotu, vai tas ir Datums vai nē. Tā kā mēs jau esam saglabājuši vērtību mainīgajam “MyDate”, sniedziet tikai mainīgā nosaukumu.
Kods:
Sub IsDate_Example1 () Dim MyDate kā Date MyDate = "5.1.19" MsgBox IsDate (MyDate) Beigas Sub
Labi, tagad palaidiet kodu un skatiet, ko mēs saņemam ziņojumu lodziņā.
Oho !!! Rezultāts ir PATIESA .
Jums ir jābrīnās, kā tā par datumu atpazina vērtību “5.1.19”.
Iemesls, kāpēc tas ir atgriezis rezultātu kā PATIESA, jo, aplūkojot norādīto vērtību “5.1.19”, tā ir datuma “05.01.2019.” Īsā forma , tāpēc Excel ir pietiekami izcils, lai to atzītu par datumu, tāpēc rezultāts ir PATIESA.
Tagad šeit ir grūts, par to pašu vērtību mēs darīsim to, ka mēs mainīsim gada īso formu no 19. uz 2019. gadu.
Kods:
Sub IsDate_Example1 () Dim MyDate As String MyDate = "5.1.2019." MsgBox IsDate (MyDate) Beigas Sub
Tagad palaidiet kodu un skatiet rezultātu.
Šoreiz tas ir atgriezis rezultātu kā FALSE, jo datuma daļa “diena un mēnesis” ir īsā formā, bet gada daļa ir pilnā formā “GGGG”, tāpēc ISDATE nevar atzīt, ka tai ir datums, tāpēc rezultāts ir FALSE.
Tagad skatieties zemāk esošo kodu.
Kods:
Sub IsDate_Example1 () Dim MyDate As String MyDate = "05.01.2019." MsgBox IsDate (MyDate) Beigas Sub
Esmu minējis pilnas dienas un mēneša formātu, izmantojot 0. Palaidīsim kodu un redzēsim funkcijas IsDate rezultātu.
Šoreiz arī mēs ieguva rezultātu kā FALSE .
Tagad mainiet kodu šādi.
Kods:
Sub IsDate_Example1 () Dim MyDate kā virkne MyDate = "01.05.2019." MsgBox IsDate (MyDate) Beigas Sub
Punkta (.) Kā atdalītāja vietā kā atdalītāju esam ievadījuši slīpsvītru (/). Tagad palaidiet kodu un skatiet rezultātu.
Šoreiz rezultāts tika iegūts kā PATIESA .
Šī iemesla dēļ es raksta sākumā esmu teicis, ka “Datums” ir sensitīva lieta.
Tagad es apvienošu datumu un laiku kopā.
Kods:
Sub IsDate_Example1 () Dim MyDate As String MyDate = "01.01.2019 15:26:24" MsgBox IsDate (MyDate) Beigas Sub
Tas, ko esmu pievienojis iepriekš, ir laika daļa “15:26:24” pirms datuma. Tagad palaidiet kodu un skatiet rezultātu.
Arī šoreiz rezultāts tika iegūts kā PATIESA, jo Excel datums un laiks ir tās pašas lietas un tiek glabāti kā sērijas numuri. Viss skaitlis apzīmē datuma daļu, un decimāldaļas norāda laika daļu.
Šeit jāatceras lietas
- IsDate atgriež Būla tipa rezultātu, ti, TRUE vai FALSE.
- IsDate ir pieejams tikai kā VBA funkcija.
- Tikai derīgi formatētie datumi tiek uzskatīti par datumu, pretējā gadījumā tas tiks uzskatīts par teksta vērtībām un rezultāts tiks atgriezts kā FALSE.
