Vráti hodnotu typu Variant (Date) pre zadaný rok, mesiac a deň.
Syntax
DateSerial(rok; mesiac; deň)
Upozornenie Skontrolujte, či sú argumenty v správnom rozsahu hodnôt. Neplatný argument môže mať za následok nesprávny výsledok.
Syntax funkcie DateSerial má tieto argumenty:
| Argument | Popis |
|---|---|
| rok | Povinný argument. Hodnota typu Integer. Číslo od 100 do 9999 vrátane alebo numerický výraz. |
| Mesiac | Povinný argument. Hodnota typu Integer. Ľubovoľný numerický výraz. |
| deň | Povinný argument. Hodnota typu Integer. Ľubovoľný numerický výraz. |
Poznámky:
Ak chcete určiť dátum, napríklad 31. december 1991, rozsah čísel pre každý argument DateSerial by mal byť v prijatom rozsahu pre jednotku; to znamená 1 – 31 pre dni a 1 – 12 pre mesiace. Môžete však tiež zadať relatívne dátumy pre každý argument pomocou ľubovoľného číselného výrazu, ktorý predstavuje určitý počet dní, mesiacov alebo rokov pred určitým dátumom alebo po ňom.
V nasledujúcom príklade sa namiesto absolútnych čísel dátumov používajú numerické výrazy. Tu funkcia DateSerial vráti dátum, ktorý je deň pred prvým dňom (1 - 1), dva mesiace pred augustom (8 - 2), 10 rokov pred rokom 1990 (1990 - 10); inými slovami, 31. máj 1980.
DateSerial(1990 - 10, 8 - 2, 1 - 1)
Dvojciferné roky pre argument roka sa interpretujú na základe používateľom definovaných nastavení počítača. Predvolene sa hodnoty od 0 do 29 (vrátane) interpretujú ako roky 2000 až 2029. Predvolene sa hodnoty od 30 do 99 interpretujú ako roky 1930 až 1999. Pre všetky ostatné argumenty roka použite štvorciferný rok (napríklad 1800).
Verzie Windowsu staršie ako Windows 2000 interpretujú dvojciferné roky na základe uvedených predvolených nastavení. Ak chcete mať istotu, že funkcia vráti správnu hodnotu, používajte štvorciferný tvar roka.
Ak ktorýkoľvek argument presiahne akceptovaný rozsah pre daný argument, pripočíta sa podľa potreby k nasledujúcej vyššej jednotke. Ak napríklad zadáte 35 dní, vyhodnotí sa to ako jeden mesiac a určitý počet dní, v závislosti od toho, kde v roku sa táto hodnota použila. Ak je ktorýkoľvek jeden argument mimo rozsahu -32768 až 32767, zobrazí sa chyba. Ak dátum určený tromi argumentmi spadá mimo prijateľný rozsah dátumov, zobrazí sa chyba.
Poznámka
Ak je pre rok,mesiac a deň nastavenie vlastnosti Calendar gregoriánske, zadaná hodnota sa považuje za gregoriánsku. Ak je vlastnosť Kalendár nastavená na možnosť Hedžra, predpokladá sa, že zadaná hodnota je tiež Hedžra.
Vrátená časť s dátumom je v jednotkách časového obdobia aktuálneho kalendára programu Visual Basic. Ak je napríklad aktuálny kalendár Hedžra a časť dátumu, ktorá sa vráti, je rok, hodnota roka je podľa kalendára Hedžra. Pre argument rok sa hodnoty od 0 do 99 vrátane interpretujú ako roky 1400 – 1499. Pre všetky ostatné hodnoty roka použite úplný štvorciferný rok (napríklad 1 520).
Príklad dotazu
| Výraz | Výsledky |
|---|---|
| SELECT Dateserial(2018,12,13) AS NewDate FROM ProductSales; | Vráti hodnotu date pre zadaný rok, mesiac a deň zadaný v argumentoch funkcie a zobrazí sa v stĺpci NovýDátum. Výsledok: 12. 13. 2018. |
Príklad jazyka VBA
Poznámka
Nasledujúce príklady ukazujú použitie tejto funkcie v module jazyka Visual Basic for Applications (VBA). Ak chcete získať ďalšie informácie o práci s jazykom VBA, vyberte z rozbaľovacieho zoznamu vedľa položky Hľadať možnosť Odkaz pre vývojára a do vyhľadávacieho poľa zadajte nejaké výrazy.
V tomto príklade je funkcia DateSerial použitá na vrátenie dátumu pre zadaný rok, mesiac a deň.
Dim MyDate ' MyDate contains the date for February 12, 1969. MyDate = DateSerial(1969, 2, 12) ' Return a date.