for( $row = 1; $row < 3; $row++ ){
	
	for( $col = 1; $col < 3; $col++ ){
		my $text = $table->Cell($row,$col)->Range->{Text};
		$Sheet->Cells($row,$col)->{'Formula'}=$text;     
	}

}