Can you reduce this to a test case (i.e. use a very simple Excel file such as

my $workbook  = Spreadsheet::WriteExcel->new(\*.XLS);
my $worksheet = $workbook->addworksheet();
$worksheet->write("A1","Hello, World");
[download]

and then post your complete script. I'll then run it on my machine and see if I can reproduce the problem.

JJ