Here is a skeleton of what might work.
use strict;
use warnings;
use Win32::OLE;
my $excel= Win32::OLE->new('Excel.Application')
or die "Could not create Excel.Application!
"
;
$excel->Workbooks->open( 'C:UsersMeDocumentsBook1.xlsx' );
$excel->run( 'Book1!Macro1' );
$excel->quit;
One of the most sure ways that you can do this is to simply record a macro of opening a spreadsheet and running a macro. And then taking a look at the macro code that was generated and convert it into Perl. Keep in mind that the OLE object is the Application object.
9/22/2010 - I added quit
to stop Excel from running.
与恶龙缠斗过久,自身亦成为恶龙;凝视深渊过久,深渊将回以凝视…