Functie DateValue

Retourneert een Date-object uit een tekenreeks die een datum voorstelt.

Het geretourneerde object wordt intern weergegeven als een enkele numerieke waarde die overeenkomt met de opgegeven datum. Deze waarde kan worden gebruikt om het aantal dagen tussen twee datums te berekenen.

Syntaxis:


  DateValue(datum als tekenreeks)

Parameters:

date: een tekenreeks die de datum bevat die wordt geconverteerd naar een Date-object.

note

The string passed to DateValue must be expressed in one of the date formats defined by your locale setting (see - Languages and Locales - General) or using the ISO date format "yyyy-mm-dd" (year, month and day separated by hyphens).


Geretourneerde waarde:

Date.

Foutcodes:

5 Ongeldige aanroep van procedure

Voorbeeld:


  Sub ExampleDateValue
      Dim aDate As Date
      aDate = DateValue("2021-12-20")
      ' Drukt de gelokaliseerde datum af
      MsgBox aDate
      ' Haalt het jaar, de maand en de dag uit het datumobject
      MsgBox Year(aDate)
      MsgBox Month(aDate)
      MsgBox Day(aDate)
      ' Drukt de numerieke waarde af die overeenkomt met de datum (als type Long)
      MsgBox CLng(aDate)
  End Sub