函數InStr對我而言無法正常工作，看不到部分數據

Question

我嘗試編寫一個宏，該宏刪除單元格值內具有特定字符串的行。

For i = 1 to 5000
    If InStr(cells(i,1).value, "GUACAMOLE", vbTextCompare) Then 
        Rows(i).EntireRow.Delete    
    End If
Next i 

我不明白為什么它會不斷刪除僅包含鱷梨調味醬字符串的幾行，循環的范圍是正確的。 我嘗試了很多方法，例如使用左，中或僅使用單個符號。 請幫助我，我已經絕望了。

Answer 1

刪除行時，您需要向后退：

For i = 5000 to 1 step -1
    If InStr(UCase(Cells(i, 1).Value), "GUACAMOLE") > 0 Then 
        Rows(i).EntireRow.Delete    
    End If
Next i