→ soyoso: 如錯誤回傳空白，可以if配合iserror，match方面以 07/21 07:04
→ soyoso: application.match 07/21 07:04
→ soyoso: 或以判斷range.find如is nothing回傳空白 07/21 07:06
→ soyoso: 或以工作表函數countif，為0時回傳空白 07/21 07:08
→ arashi2014: s大你好 是否可以再問一個迴圈的問題 07/22 00:55
→ arashi2014: For i = 4 To Range("C4").End(xlDown).Row 07/22 00:57
→ arashi2014: If Cells(i, 42) = 0 Then 07/22 00:57
→ arashi2014: Rows(i).Delete Shift:=xlUp 07/22 00:57
→ arashi2014: v=v-1 07/22 00:57
→ arashi2014: 想問這樣要怎麼改比較好 因為刪除的列上移 07/22 00:58
→ arashi2014: 所以讓刪除的時候v-1再跑一次確保每一列都比較過 07/22 00:59
→ arashi2014: 但發現這樣跑不動 不知為何 07/22 00:59
→ arashi2014: 我確定是v-1這一行的問題 07/22 01:02
推 foolkids: 迴圈反過來跑，i = 4 to 1, step -1 07/22 06:12
→ soyoso: 如f大所述反序，以回文來看為 07/22 10:03
→ soyoso: for i = range("c4").end(xldown).row to 4 step -1 07/22 10:03
→ soyoso: 只是v=v-1這裡的變數v並無於回文內出現，所以不太清楚該變 07/22 10:07
→ soyoso: 數和確保每一列都比較過的關係為？ 07/22 10:07
→ soyoso: 但如以反序的話，應就可取消該行試試 07/22 10:08
推 foolkids: 對，i = i - 1 這行不用寫 07/22 10:20
推 foolkids: 至於你原文的問題，如果查找的範圍很大，建議將資料寫成 07/22 10:22
→ foolkids: 陣列，在陣列裡查找會比較快 07/22 10:22
→ foolkids: 具體做法是A陣列存放查找key值、B陣列存放回傳值，兩個 07/22 10:25
→ foolkids: 陣列的順序一致時，可以在A陣列找到key值的資料序號，然 07/22 10:25
→ foolkids: 後帶回B陣列該序號的值，可以大幅加快運算速度 07/22 10:25
→ soyoso: 請問f大那裡有i=i-1？我只有看到v=v-1 07/22 10:31
推 foolkids: s大，抱歉，我剛剛以為你回的那些訊息是原po問的… 他應 07/22 10:56
→ foolkids: 該是key錯吧？ 07/22 10:56
→ arashi2014: v是打錯沒錯 很感謝兩位大大 改善非常多 07/22 13:10
→ arashi2014: f大提供的方式我晚一點試試看 非常感謝 07/22 13:11