删除后在细胞上循环运输

Question

我一直在从事一个项目，而我正在最后一步，我希望最后一段代码要做的就是删除所有以25、26或27开头的行

For Each cell In Worksheets("Sheet2").Range("A:A")
        If Left(CStr(cell.Value), 2) <> 25 And Left(CStr(cell.Value), 2) <> 26 And Left(CStr(cell.Value), 2) <> 27  Then
            matchRow = cell.Row
            Rows(matchRow & ":" & matchRow).Select
            Selection.Delete Shift:=xlDown

结果不理想：运行某些单元格后仍然存在。 我认为，使用这种方法，当我删除一个单元格时，它会移动周期，并跳过下一个单元格。

如何防止这种情况发生？

Answer 1

要删除行，最好从底部开始并进行处理

width: initial