Funkce DateValue
Vrátí objekt Date z řetězce představujícího datum.
Vrácený objekt je vnitřně reprezentován jako jediná číselná hodnota odpovídající stanoveného datu. Tuto hodnotu je možné použít pro výpočet počtu dní mezi dvěma daty.
DateValue(date As String)date: Řetězec obsahující datum, které se převede na objekt Date.
Je nutné, aby byl řetězec předaný funkci DateValue vyjádřen v některém z formátů data definovaných v nastavení národního prostředí (viz ) nebo formátem data standardu ISO ve tvaru "yyyy-mm-dd" (rok, měsíc a den oddělené spojovníky).
Date.
Sub ExampleDateValue
Dim aDate As Date
aDate = DateValue("2021-12-20")
' Vypíše lokalizované datum
MsgBox aDate
' Získá z objektu data rok, měsíc a den
MsgBox Year(aDate)
MsgBox Month(aDate)
MsgBox Day(aDate)
' Vypíše číselnou hodnotu odpovídající datu (jako typ Long)
MsgBox CLng(aDate)
End Sub