my $cell =Spreadsheet::ParseExcel::Cell->new(
Val    => $v,
Format => $thisstyle,
Type => $type
);