Prova con
cdate(37405)

....e indovina che data ti da'...

Per il passaggio contrario:
codice:
dim dt as date
dt="29/05/2002"
debug.print clng(dt)
Ciao.