Variables of type Date must have their values enclosed in # signs
Sub dateSub() Dim thisDate As Date thisDate = #10/8/2003# Debug.Print thisDate End Sub