DateValue Function

Returns a Date object from a string representing a date. The returned object is represented internally as a single numeric value corresponding to the specified date. This value can be used to calculate the number of days between two dates.

DateValue(date As String)

date: A string that contains the date that will be converted to a Date object. The string passed to DateValue must be expressed in one of the date formats defined by your locale setting (see %PRODUCTNAME - PreferencesTools - Options - Language Settings - Languages) or using the ISO date format "yyyy-mm-dd" (year, month and day separated by hyphens).

Date.

Sub ExampleDateValue Dim aDate As Date aDate = DateValue("2021-12-20") ' Prints the localized date MsgBox aDate ' Extracts the year, month and day from the date object MsgBox Year(aDate) MsgBox Month(aDate) MsgBox Day(aDate) ' Prints the numeric value corresponding to the date (as Long type) MsgBox CLng(aDate) End Sub