Vrátí hodnotu Variant (Date).
Syntaxe
DateValue ( date )
Požadované datumArgument je obvykle Řetězcový výraz představující datum od 1. ledna 100 do 31. prosince 9999. Datem ale může být také libovolný Výraz, který může představovat datum, čas nebo datum a čas v daném rozsahu.
Poznámky
Pokud je datum řetězec, který obsahuje pouze čísla oddělená platnými Oddělovače data, funkce DateValue rozpozná pořadí pro měsíc, den a rok podle formátu krátkého data, který jste zadali pro váš systém. DateValue také rozpoznává jednoznačná data, která obsahují názvy měsíců, a to buď v dlouhé, nebo zkrácené podobě. Například kromě rozpoznávání 30. 12. 1991 a 30. 12. 991 funkce DateValue rozpozná také hodnoty 30. prosince 1991 a 30. prosince 1991.
Pokud je část kalendářního roku vynechána, použije funkce DateValue aktuální rok ze systémového data počítače.
Pokud argument date obsahuje informace o čase, funkce DateValue je nevrátí. Pokud však datum obsahuje neplatné informace o čase (například 89:98), dojde k chybě.
Poznámka: Pokud je pro datum nastavená vlastnost Kalendář gregoriánský, musí být zadané datum gregoriánské. Pokud je kalendář Hidžra, musí být zadané datum Hidžra. Pokud je zadané datum Hidžra , argument datum je řetězec představující datum od 1. 1. 100 (Gregorián 2. srp 718) do 3. 4. 9666 (Gregorián 31. prosince 9999).
Příklady dotazů
Výraz |
Výsledky |
SELECT DateValue([DateTime]) AS Expr1 FROM ProductSales; |
Vrátí hodnoty kalendářních dat pole DateTime ve formátu krátkého data bez informací o čase. |
SELECT DateValue([DateTime]) AS NewDate, Count(ProductSales.DateTime) AS CountOfDateTime FROM ProductSales GROUP BY DateValue([DateTime]); |
Vrátí hodnoty kalendářních dat pole DateTime ve formátu krátkého data bez informací o čase. |
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 DateValue k převodu řetězce na datum. Pomocí datových literálů můžete také přímo přiřadit datum proměnné Variant nebo Date , například MyDate = #2/12/69#.
Dim MyDate
MyDate = DateValue("February 12, 1969") ' Return a date.