Select Code to Download

foreach $longname (@longnames) {
    $findit = $sheet->Range("A$first_data_row:$last_col$last_row")->Fi
+nd({What=>$longname});
...
        }
    }
}

$newhash = $sheet->Cells->FindNext({After=>ActiveCell});
$newhash = $sheet->Cells->FindNext();
$newhash = $excel->Cells->FindNext({After=>ActiveCell});
$newhash = $sheet->Cells->FindNext({After=>"$thisone"});