If you want to read a date from an excel cell using WIN32::OLE, you should use the following

my $date = $Sheet->Range($r)->{FormulaR1C1};     # dont use Value for 
+dates
[download]

Possibly you have to do something similar for the properties ...

HTH, Rata