Как понять, что в переменной ничего нет и предупредить ошибку?

@AndreA SN · Регистрация: 26.08.2011

Author24 — интернет-сервис помощи студентам

Провожу отбор строк на листе автофильтрацией
Результаты отбора помещаю в переменную rng

Visual Basic

1	Set rng = Range("A2:A" & n).SpecialCells(xlCellTypeVisible)

Но если не отфильтровано ни одной строки - возникает ошибка, которая сразу вышвыривает меня из функции.
Как понять, что ни одной строки не отфильтровано перед Set?

Добавлено через 4 минуты
хочется что то типа

Visual Basic

1	If isnothing(rng) = True Then Exit Function

@Казанский · 24.02.2016, 23:38

AndreA SN,

Visual Basic

on error resume next
Set rng = Range("A2:A" & n).SpecialCells(xlCellTypeVisible)
If rng is nothing Then Exit Function
'или
if err Then Exit Function

	24.02.2016, 23:38

Опции темы

Как понять, что в переменной ничего нет и предупредить ошибку?

Решение