my $newworksheet = $activeWorkbook->Worksheets->Add({Before=>$activeWorkbook->Worksheets(1)})  or die $!;
$newworksheet -> {Name} = "Chart$Tester";
#the sheet is created -> switch off the gridlines
$newworksheet -> DisplayGridlines = 'False';