Vrátí hodnotu typu Variant (Date) pro zadaný rok, měsíc a den.
Syntaxe
DateSerial(rok, měsíc, den)
Upozornění Zkontrolujte, jestli jsou argumenty ve správném rozsahu hodnot. Neplatný argument může mít za následek nesprávný výsledek.
Syntaxe funkce DateSerial obsahuje tyto argumenty:
| Argument | Popis |
|---|---|
| rok | Povinný argument. Celé číslo. Číslo v rozsahu 100 až 9999 (včetně) nebo číselný výraz. |
| Měsíc | Povinný argument. Celé číslo. Libovolný číselný výraz. |
| dne | Povinný argument. Celé číslo. Libovolný číselný výraz. |
Poznámky
Pokud chcete zadat datum, například 31. prosince 1991, měl by být rozsah čísel pro každý argument DateSerial v akceptovaném rozsahu pro jednotku. to znamená 1–31 pro dny a 1–12 pro měsíce. Pro každý argument ale můžete zadat relativní data pomocí libovolného číselného výrazu, který představuje určitý počet dnů, měsíců nebo roků před nebo po určitém datu.
Následující příklad používá místo absolutních čísel kalendářních dat číselné výrazy. V tomto případě funkce DateSerial vrátí datum den před prvním dnem (1 - 1), dva měsíce před srpnem (8 - 2), 10 let před rokem 1990 (1990 - 10), jinými slovy 31. květen 1980.
DateSerial(1990 - 10, 8 - 2, 1 - 1)
Dvouciferné roky pro argument rok jsou interpretovány na základě uživatelem definovaného nastavení počítače. Ve výchozím nastavení jsou hodnoty od 0 do 29 (včetně) 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řčíselný rok (třeba 1800).
Verze systému Windows starší než Windows 2000 interpretují dvouciferné roky na základě výše popsaných výchozích hodnot. Abyste měli jistotu, že funkce vrátí správnou hodnotu, zadejte čtyřciferný rok.
Pokud některý z argumentů překročí akceptovaný rozsah tohoto argumentu, zvýší se podle potřeby na nejbližší větší jednotku. Pokud třeba 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 je použitá. Pokud je libovolný argument mimo rozsah od -32 768 do 32 767, dojde k chybě. Pokud datum určené třemi argumenty spadá mimo povolený rozsah kalendářních dat, dojde k chybě.
Poznámka
Pro rok,měsíc a den, pokud je nastavení vlastnosti Calendar gregoriánského kalendáře, se za zadanou hodnotu považuje gregoriánský kalendář. Pokud je vlastnost Calendar nastavená jako kalendář Hidžra, předpokládá se, že zadaná hodnota je Hidžra.
Vrácená část s datem je v jednotkách časového období aktuálního kalendáře jazyka Visual Basic. Pokud je třeba aktuální kalendář kalendář Hidžra a datová část, která se má vrátit, je rok, hodnota roku je Hidžra. Pro argument rok jsou hodnoty od 0 do 99 (včetně) interpretovány jako roky 1400–1499. U všech ostatních hodnot roku použijte celý čtyřčíselný 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 "NewDate". 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.