Paul wrote in
48.16:

Sheet1.Range("A1") = CDate("31/12/1899")
Debug.Print (Sheet1.Range("A1").Text)
Debug.Print (Sheet1.Range("A1").Value)
Yields
01/01/1900
31/12/1899

Argh!

Well I know that's because of 29 feb 1900... but still "Argh!". And that
doesn't help with my original problem.

Paul