Date comme numéro VB

Date.Parse("01.01.2001").ToOADate
Salty Joe