$i=1;
		for (@cols)
		{
			my $s=xl_rowcol_to_cell(1,$i);
			my $e=xl_rowcol_to_cell($row-1,$i);
			
			my $range="$s:$e";
			print "$i:Range:$range\n";
			$worksheet->write_formula($row,$i,'=MAX('.$range.')');
			$worksheet->write_formula($row+1,$i,'=AVERAGE('.$range.')');
			
			$i++;
		}