for (my $row = 16; $row <=20; $row++ ) { $sheet->Range( $row . ',1' )->Insert(); $sheet->Range( "A" . $row )->{Value} = "data"; # $sheet->Range( ($row+1) . ',1' )->Insert(); # Alternativ }