Как получить без следующей ошибки, не знаю почему - PullRequest
1 голос
/ 21 июня 2011

Я пытаюсь зациклить строки выброса и сказать: «Если ячейка в этом столбце начинается с 49, скрыть всю строку». Вот мой код:

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

Он останавливается на последней строке и говорит: «Без следующего». Разве он не видит линию FOR три линии вверх? Это только одно из многих утверждений, которые у меня есть, но я думаю, что исправление этого поможет мне отформатировать остальные. Что я делаю не так?

Ответы [ 2 ]

4 голосов
/ 21 июня 2011

Вы пропустили 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
2 голосов
/ 21 июня 2011

Конец, если отсутствует!
Требуется, если вы поместите следующую инструкцию в другую строку.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...