if ($graph==1) { #Write values for run chart $hidden_worksheet->write(0,$stab_column_end+1,"Time"); $hidden_worksheet->write_col(1,$stab_column_end+1,\@time_data); $hidden_worksheet->write(0,$stab_column_end+2,"Speed 1"); $hidden_worksheet->write_col(1,$stab_column_end+2,\@speed_1_data); $hidden_worksheet->write(0,$stab_column_end+3,"Speed 2"); $hidden_worksheet->write_col(1,$stab_column_end+3,\@speed_2_data); $hidden_worksheet->write(0,$stab_column_end+4,"Speed 3"); $hidden_worksheet->write_col(1,$stab_column_end+4,\@Speed_3_data); #Add run chart my $run_chart = $workbook->add_chart_ext('.\charts\run_chart.bin',"Step response run"); $worksheet->store_formula('=Hidden data sheet!A1'); }