Vrátí hodnotu typu variant (Date).
Syntaxe
DateValue(datum)
Povinným argumentem dataje obvykle řetězcový výraz představující datum od 1. ledna 100 do 31. prosince 9999. Argumentem datum může být libovolný výraz, který v daném rozsahu představuje datum, čas nebo obojí.
Poznámky
Pokud je datum řetězec obsahující pouze čísla oddělená platnými oddělovači data, rozpozná funkce DateValue pořadí pro měsíc, den a rok podle krátkého formátu data, který jste zadali pro svůj systém. Funkce DateValue rozpozná také jednoznačná kalendářní data, která obsahují názvy měsíců, a to buď v dlouhém nebo zkráceném formátu. Například kromě dat 30. 12. 1991 a 30. 12. 1991 rozpozná DateValue také datum 30. prosince 1991 a 30. prosince 1991.
Pokud část roku v rámci data vynecháte, použije funkce DateValue aktuální rok ze systémového data vašeho počítače.
Pokud argument datum obsahuje informace o čase, funkce DateValue je nevrací. Pokud ale datum obsahuje neplatnou informaci o čase (třeba "89:98"), dojde k chybě.
Poznámka
Pokud je vlastnost typu Calendar nastavena v gregoriánském kalendáři, musí být zadané datum gregoriánského kalendáře. Pokud je kalendář hidžra, zadané datum musí být hidžra. Pokud je zadané datum hidžra, argumentem date je řetězec představující datum od 1. 1. 100 (gregoriánský srpen 2 718) do 4/3/9666 (gregoriánský prosinec 31, 9999).
Příklady dotazů
| Výraz | Výsledky: |
|---|---|
| SELECT DateValue([DateTime]) AS Expr1 FROM ProductSales; | Vrátí hodnoty kalendářních dat v poli 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 v poli 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.
V tomto příkladu se funkce DateValue používá k převodu řetězce na datum. Pomocí literálů typu datum můžete také přímo přiřadit datum proměnné typu Variant nebo Date , například MyDate = #2/12/69#.
Dim MyDate
MyDate = DateValue("February 12, 1969") ' Return a date.