IsDate

Public Function IsDate(ByVal Expression As Variant) As Boolean

Returns True if the specified variable/expression is of type Date.

Dim lVariant As Variant

SendDebug IsDate(lVariant) ' Sends out 'False': lVariant is Empty.

lVariant = Now
SendDebug IsDate(lVariant) ' Sends out 'True'

See also: