Zwraca wartość typu wariant (datę).
Składnia
DateValue(data)
Argument datawymagana jest zazwyczaj wyrażeniem ciągu reprezentującym datę od 1 stycznia 100 do 31 grudnia 9999. Jednak data może być również dowolnym wyrażeniem reprezentującym datę, godzinę lub datę i godzinę z tego zakresu.
Uwagi
Jeśli data jest ciągiem zawierającym tylko liczby rozdzielone prawidłowymi separatorami daty, funkcja DateValue rozpoznaje kolejność miesięcy, dni i lat zgodnie z formatem daty krótkiej określonym dla systemu. Funkcja DateValue rozpoznaje również daty jednoznaczne, które zawierają nazwy miesięcy w formie długiej lub skróconej. Na przykład oprócz rozpoznawania daty 1991-12-30 i 91-12-30 funkcja DateValue rozpoznaje również daty 30 grudnia 1991 i 30 grudnia 1991.
Jeśli część daty zawierająca rok zostanie pominięta, funkcja DataWartość użyje bieżącego roku z daty systemowej komputera.
Jeśli argument data zawiera informacje o godzinie, funkcja DataWartość jej nie zwraca. Jeśli jednak data zawiera nieprawidłowe informacje o czasie (na przykład "89:98"), występuje błąd.
Uwaga
W przypadku daty, jeśli ustawieniem właściwości Kalendarz jest kalendarz gregoriański, podana data musi być gregoriańska. Jeśli kalendarz jest kalendarzem Hidżry, podana data musi być kalendarzem Hidżra. Jeśli podana data to Hijri, argument data jest ciągiem reprezentującym datę od 1/1/100 (2 sierpnia 718 roku według kalendarza gregoriańskiego) do 3/04/9666 (31 grudnia 9999 roku według kalendarza gregoriańskiego).
Przykłady kwerend
| Wyrażenie | Rezultat |
|---|---|
| SELECT DateValue([DateTime]) AS Wyr1 FROM ProductSales; | Zwraca wartości daty w polu "DateTime" w formacie daty krótkiej bez informacji o godzinie. |
| SELECT DateValue([DateTime]) AS NewDate, Count(ProductSales.DateTime) AS CountOfDateTime FROM ProductSales GROUP BY DateValue([DateTime]); | Zwraca wartości daty w polu "DateTime" w formacie daty krótkiej bez informacji o godzinie. |
Przykład kodu VBA
Uwaga
Poniższe przykłady przedstawiają sposób użycia tej funkcji w module języka Visual Basic for Applications (VBA). Aby uzyskać dodatkowe informacje na temat pracy w języku VBA, wybierz pozycję Dokumentacja dewelopera z listy rozwijanej obok przycisku Wyszukaj i wprowadź odpowiednie terminy w polu wyszukiwania.
W tym przykładzie użyto funkcji DateValue do przekonwertowania ciągu na datę. Można również użyć literałów dat, aby bezpośrednio przypisać datę do zmiennej typu wariant lub daty , na przykład MojaData = #2/12/69#.
Dim MyDate
MyDate = DateValue("February 12, 1969") ' Return a date.