$worksheet1->Cells($Row, $Col)->{'Value'} = $var1;
    $worksheet1->Cells($Row, $Col+1)->{'Value'} = $var2;
    $worksheet1->Cells($Row, $Col+2)->{'Value'} = $var3;
    $worksheet1->Cells($Row, $Col+3)->{'Value'} = $var4;