Incorrect Date Value

Stanny · January 17th, 2005, 03:53 PM

Hi All,

I've created a small VBA routine for inserting the last date used in a datefield. the momen the datefield has the focus and this date field = NULL , the last date used must be inserted in this field.

The problem I encounter is always he adds December 30 1899 ???
while the last date used is infact January 5 2005 ,

Can any one help me ?

Thx
Stanny

jemacc · January 17th, 2005, 05:34 PM

(Now() returns the date and time, Date() just returns the date)

Code:

> Val(Format(DateAdd("d", -5, Date()), "yyyymmdd"))

Jaime E. Maccou