Yes. I have tried declaring

my $trans_format = $workbook->add_format();
$trans_format->set_num_format('$0.00');
[download]

where I set my other formats and after the while loop. I have also done $worksheet->set_column('I:I', undef, $trans_format); after the while loop. I can't figure it out..