CPAN Write Excel

[Gallon]

I have MS Excel spreadsheets with tons of formulas and data already in
them, so I was very excited about discovering
"Spreadsheet::WriteExcel". This would allow me to write data directly
from my Perl scripts, rather than cutting and pasting. The only
drawback, except for me being an idiot or a luddite, is the module only
seems to have a "new" constructor! I need an "open" constructor, or
whatever. Does anyone know how I might do this???

Sincerely,

Gregg Allen

 

[Gordana]

OK.
I use the Win32::OLE module, and I can create, and save file.
How to open existing Excel .XLS file?

Thanks.


--

 

[Tad McClellan]

The very first paragraph of the documentation for the module you
are using says:

This module cannot be used to write to an existing Excel file.

So far as I know, Spreadsheet::WriteExcel does exactly what it says: it
writes Excel files. It doesn't read them or update them.
Spreadsheet:arseExcel will read Excel files. Between the two, you
might be able to accomplish an update. I recommend, though, that you
check out the Win32::OLE module. It is more suitable for updating Excel
spreadsheets. There are Excel examples in the module documentation that
will get you started.

I needed to do this in a CGI program last week, but the web server
was not Redmondware, so no OLE.

Jakarta POI to the rescue!

http://jakarta.apache.org/poi/

Recalling enough Java to get it working made me spit, but it allowed
me to serve Excel files derived from an Excel "template" file.

 

[Craig]

OK.
I use the Win32::OLE module, and I can create, and save file.
How to open existing Excel .XLS file?

Thanks.

Here is a simple example:

#!/C:/Perl/bin/perl.exe
use strict;
use warnings;
use Win32::OLE qw(in with);
use Win32::OLE::Const 'Microsoft Excel';
use Win32::OLE::Variant;
$Win32::OLE::Warn = 3;

my $excel = Win32::OLE->GetActiveObject('Excel.Application') ||
Win32::OLE->new('Excel.Application', 'Quit');
my $book = $excel->Workbooks->Open("C:\\TMP\\test1.xls");
my $sheet = $book->Worksheets(1);
my $aref = $sheet->Range("A15")->{Value};
my $sheet2 = $book->Worksheets(2);
$sheet2->Range("A610")->{Value} = $aref;

 

[Gallon]

The very first paragraph of the documentation for the module you
are using says:

This module cannot be used to write to an existing Excel file.



I needed to do this in a CGI program last week, but the web server
was not Redmondware, so no OLE.

Jakarta POI to the rescue!

http://jakarta.apache.org/poi/

Recalling enough Java to get it working made me spit, but it allowed
me to serve Excel files derived from an Excel "template" file.

*********************************************************************

"This module cannot be used to write to an existing Excel file"

I'm on a MAC. I should have read the documentation first instead of
just examining the code.

Thanks

 

[Tad McClellan]

Tad McClellan wrote:

[ snip full-quote. Please do not do that. ]

I'm on a MAC.

I'm on a chair.