DateSerial funkcija

Pateikia nurodytų metų, mėnesio ir dienos variantą (datą) .

Sintaksė

DateSerial ( metai, mėnuo, diena )

Funkcijos DateSerial sintaksė turi tokius argumentus:

Argumentas

Aprašas

metai

Būtinas. Sveikasis skaičius. Skaičius tarp "100" ir "9999", "imtinai" arba skaitinis reiškinys.

mėnuo

Būtinas. Sveikasis skaičius. Bet kuris skaitinis reiškinys.

diena

Būtinas. Sveikasis skaičius. Bet kuris skaitinis reiškinys.

Pastabos

Norėdami nustatyti datą, pvz., gruodžio 31 d., 1991, kiekvienos DateSerialargumentas turėtų būti nurodytas vieneto priimtame intervale; tai yra 1 – 31 dienomis ir nuo 1 iki 12 mėnesių. Tačiau taip pat galite nustatyti santykines kiekvieno argumento datas naudodami bet kurį skaitinę išraišką, reiškiančią tam tikrą dienų, mėnesių ar metų skaičių prieš arba po tam tikros datos.

Toliau pateiktame pavyzdyje vietoj absoliučiųjų datų skaičių naudojami skaitiniai reiškiniai. Čia funkcija DateSerial pateikia datą, kuri yra diena prieš pirmąją dieną (1 - 1), prieš du mėnesius iki rugpjūčio (8 - 2), prieš 10 metų iki 1990 (1990 - 10); kitaip sakant, 1980 gegužės 31 d.

DateSerial(1990 - 10, 8 - 2, 1 - 1)

Dviejų skaitmenų metų argumentas argumentams Year yra interpretuojamas pagal vartotojo nustatytus kompiuterio parametrus. Numatytieji parametrai yra šios reikšmės: nuo 0 iki 29, imtinai, yra interpretuojamos kaip 2000 – 2015 metų. Numatytosios reikšmės nuo 30 iki 99 yra interpretuojamos kaip metai 1930 – 1999. Visais kitais metų argumentais naudokite keturis skaitmenis metus (pvz., 1800).

"Windows" versijos, senesnės nei "Windows" 2000, aiškina dviženklius metus pagal anksčiau aprašytus numatytuosius parametrus. Įsitikinkite, kad funkcija pateikia tinkamą reikšmę, naudokite keturis skaitmenų metus.

Kai bet kuris argumentas viršija šiam argumentui priimtiną intervalą, jis atitinkamai padidina kitą didesnį vienetą. Pvz., nurodžius 35 dienas, ji vertinama kaip vienas mėnuo ir tam tikras dienų skaičius, atsižvelgiant į tai, kur yra taikomi metai. Jei kuris nors vienas argumentas nepatenka į "32 768" ir "32 767", įvyksta klaida. Jei data, nurodyta trijuose argumentuose, nepatenka į priimtiną datų intervalą, įvyksta klaida.

Pastaba: Jei kalendoriaus ypatybės parametras yra Grigaliaus, pateikta metų, mėnesioirdienosreikšmė laikoma Grigaliaus. Jei ypatybės Calendar parametras yra Hidžri, pateikta reikšmė laikoma Hidžri.

Grąžinama datos dalis yra dabartinio "Visual Basic" kalendoriaus laikotarpio vienetais. Pvz., jei esamas kalendorius yra Hidžri, o grąžinama datos dalį sudaro metai, metų reikšmė yra Hidžri metai. Argumento metaireikšmės nuo 0 iki 99, imtinai, yra interpretuojamos kaip "1400-1499" metai. Visoms kitoms metų reikšmėms naudokite visus keturis skaitmenų metus (pvz., 1520).

Užklausos pavyzdys

Reiškinys

Rezultatai

Pasirinkite DateSerial (2018, 12; 13) kaip NewDate iš ProductSales;

Grąžina nurodytų metų, mėnesio ir dienos, įtrauktų į funkcijos argumentus, "date" ir rodoma stulpelyje "NewDate". Rezultatas: "13/12/2018".

VBA pavyzdys

Pastaba: Pateiktuose pavyzdžiuose parodyta, kaip naudoti šią funkciją „Visual Basic for Applications“ (VBA) modulyje. Daugiau informacijos apie darbą su VBA rasite išplečiamajame sąraše pasirinkę Kūrėjų nuoroda (šalia Ieškos) ir ieškos lauke įvedę vieną ar daugiau sąlygų.

Šiame pavyzdyje naudojama funkcija DateSerial , kad būtų grąžinta nurodytų metų, mėnesio ir dienos data.

Dim MyDate ' MyDate contains the date for February 12, 1969. MyDate = DateSerial(1969, 2, 12) ' Return a date.

Pastaba:  Šis puslapis išverstas automatiškai, todėl gali būti gramatikos klaidų ar netikslumų. Mūsų tikslas – padaryti, kad šis turinys būtų jums naudingas. Prašome mus informuoti, ar radote reikiamos informacijos. Čia yra straipsnis anglų kalba, kuriuo galite pasinaudoti kaip nuoroda.

Taip pat žr.

Pasirinkite tinkamą funkciją DATE

Tobulinkite savo „Office“ įgūdžius
Ieškoti mokymo
Pirmiausia gaukite naujų funkcijų
Prisijunkite prie „Office Insider“ dalyvių

Ar ši informacija buvo naudinga?

Dėkojame už jūsų atsiliepimus!

Dėkojame už jūsų atsiliepimą! Panašu, kad gali būti naudinga jus sujungti su vienu iš mūsų „Office“ palaikymo agentų.

×