Select Code to Download

my $Excel = Win32::OLE->GetActiveObject('Excel.Application')
   or do { Win32::OLE->new('Excel.Application', 'Quit');
           die "Could not start excel";
         };