Помогите, пожалуйста. Макрос делает проверку на наличие ошибки в определенном столбце. После этого действия есть продолжение макроса.
Мне нужно, чтобы макрос прекращал полностью работу и выдавал сообщение об ошибке.
С проверкой и ошибкой проблем нет, а вот с одновременной остановкой и сообщением - проблема
Как допилить код?
Мне нужно, чтобы макрос прекращал полностью работу и выдавал сообщение об ошибке.
С проверкой и ошибкой проблем нет, а вот с одновременной остановкой и сообщением - проблема
Как допилить код?
Код |
---|
Sub Check() Dim LastRow As Long, i As Long LastRow = Cells(Rows.Count, 13).End(xlUp).Row For i = LastRow To 2 Step -1 If Cells(i, 13) = "error" Then MsgBox "!!! #N/A in ServRendDate !!!" Range("M1").Select Next End Sub |