Vrátí hodnotu typu Variant (Date) pro zadaný rok, měsíc a den.
Syntaxe
DateSerial ( rok, měsíc, den )
Upozornění Ujistěte se, že argumenty jsou ve správném rozsahu hodnot. Neplatný argument může vést k nesprávnému výsledku.
Syntaxe funkce DateSerial má tyto argumenty:
|
Argument |
Popis |
|
rok |
Povinný argument. Celé číslo. Číslo mezi 100 a 9999 včetně nebo Číselný výraz. |
|
měsíc |
Povinný argument. Celé číslo. Libovolný číselný výraz. |
|
den |
Povinný argument. Celé číslo. Libovolný číselný výraz. |
Poznámky
Chcete-li zadat datum, například 31. prosince 1991, musí být rozsah čísel pro každouArgumentDateSerial v přijatém rozsahu pro danou jednotku; to znamená 1–31 pro dny a 1–12 pro měsíce. Můžete ale také zadat relativní data pro každý argument pomocí libovolného číselného výrazu, který představuje určitý počet dní, měsíců nebo let před nebo po určitém datu.
V následujícím příkladu se místo absolutních čísel kalendářních dat používají číselné výrazy. Funkce DateSerial zde vrátí datum, které představuje den před prvním dnem (1 - 1), dva měsíce před srpnem (8 - 2), 10 let před 1990 (1990 - 10); jinými slovy, 31. května 1980.
DateSerial(1990 - 10, 8 - 2, 1 - 1)
Dvoumístné roky pro argument rok se interpretují na základě nastavení počítače definovaného uživatelem. Výchozí nastavení je, že hodnoty mezi 0 a 29 (včetně) jsou interpretovány jako roky 2000–2029. Výchozí hodnoty mezi 30 a 99 jsou interpretovány jako roky 1930–1999. Pro všechny ostatní argumenty roku použijte čtyřmístný rok (například 1800).
Verze systému Windows starší než Windows 2000 interpretují dvoumístné roky na základě výchozích nastavení popsaných výše. Abyste měli jistotu, že funkce vrátí správnou hodnotu, použijte čtyřmístný rok.
Pokud některý argument překročí povolený rozsah pro tento argument, zvýší se podle potřeby na další větší jednotku. Pokud například zadáte 35 dnů, vyhodnotí se jako jeden měsíc a určitý počet dnů v závislosti na tom, kde v roce se použije. Pokud je některý z argumentů mimo rozsah -32 768 až 32 767, dojde k chybě. Pokud datum zadané třemi argumenty spadá mimo přijatelný rozsah kalendářních dat, dojde k chybě.
Poznámka: Pro rok, měsíc a den platí, že pokud je nastavení vlastnosti Kalendář gregoriánské, předpokládá se, že zadaná hodnota je gregoriánská. Pokud je nastavení vlastnosti Kalendář Hidžra, předpokládá se, že zadaná hodnota je Hidžra.
Vrácená část data je v jednotkách časového období aktuálního kalendáře jazyka Visual Basic. Pokud je například aktuální kalendář Hidžra a vrácená část kalendářního data je rok, hodnota roku je hidžrský rok. Pro argumentový rok se hodnoty mezi 0 a 99 (včetně) interpretují jako roky 1400–1499. Pro všechny ostatní hodnoty roku použijte úplný čtyřmístný rok (například 1520).
Příklad dotazu
|
Výraz |
Výsledky |
|
SELECT Dateserial(2018,12,13) AS NewDate FROM ProductSales; |
Vrátí "datum" pro zadaný rok, měsíc a den zadané v argumentech funkce a zobrazí se ve sloupci "Novédate". Výsledek: "13/12/2018". |
Příklad jazyka VBA
Poznámka: Následující příklady ukazují použití této funkce v modulu VBA (Visual Basic pro Applications). Pokud chcete další informace o práci s modulem VBA, vyberte Referenční informace pro vývojáře, které najdete v rozevíracím seznamu vedle položky Hledat a do vyhledávacího pole napište požadované pojmy.
Tento příklad používá funkci DateSerial k vrácení data pro zadaný rok, měsíc a den.
Dim MyDate ' MyDate contains the date for February 12, 1969. MyDate = DateSerial(1969, 2, 12) ' Return a date.
