Select Code to Download

$Win32::OLE::Warn = 3;                     # die ( UGLY ) on errors...
my $Excel =  Win32::OLE->new('Excel.Application', 'Quit');
...
$LastCol = $Sheet->UsedRange->Find({What=>"*",
        SearchDirection=>xlPrevious,
        SearchOrder=>xlByColumns})->{Column};

$lastdate =  $Sheet->Range("CK1")->Win32::OLE::valof({'Value'});
print "Data is THROUGH $lastdate \n\n";

$lastdate =  $Sheet->Range($LastCol)->Win32::OLE::valof({'Value'});
print "Data is THROUGH $lastdate \n\n";

Win32::OLE(0.1702) error 0x800a03ec<br>
    in METHOD/PROPERTYGET "Range" at getdrills_time3.pl line 32

$lastdate = $Sheet->Cells(1, $LastCol)->Win32::OLE::valof ({ 'Value'})
+;
print "jcmcnamara's version: $lastdate \n";