This is due to the fact that Spreadsheet::WriteExcel is currently based on the Excel5 file format where merging and rotation are mutually exclusive.
However Excel 97 and Excel 2000 ignore this fact and you can get the effect that you want using the code shown below.
#!/usr/bin/perl -w use strict; use Spreadsheet::WriteExcel; my $workbook = Spreadsheet::WriteExcel->new('test.xls'); my $worksheet = $workbook->addworksheet(); my $format = $workbook->addformat( border => 1, color => 'blue', merge => 1, rotation => 1, ); $worksheet->write('B2', 'Hello', $format); $worksheet->write('C2', '', $format); $worksheet->write('D2', '', $format);
However, you should consider this to be a kludge. ;-) Hopefully it will be possible to do this more robustly when the module moves to the Excel97+ format.
--
John.
In reply to Re: Spreadsheet::WriteExcel, rotate text
by jmcnamara
in thread Spreadsheet::WriteExcel, rotate text
by gnu@perl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |