没有下一个错误，不知道为什么

Question

我正在尝试循环抛出行并说“如果此列中的单元格以49开头，则隐藏整行”。这是我的代码：

For i = 2 To LastRow
    If Rows("AK" & i).Value Like "49*" Then
        Rows("AK" & i).EntireRow.Hidden = True
Next i

它一直停在最后一行并说“没有下一个”。难道不能看到FOR系三条线吗？这只是我喜欢的许多陈述中的一个，但我认为修复这个陈述将有助于我格式化其他陈述。我做错了什么？

Answer 1

您错过了End If（措辞是这样的，因为它在Next块中看到If而没有匹配的For;这是非法的）

For i = 2 To LastRow
    If Range("AK" & i).Value Like "49*" Then
        Range("AK" & i).EntireRow.Hidden = True
    End If
Next i

Answer 2

如果遗失则结束！
如果您将下一条指令放在另一条线上，则需要它。