Оператор VBA «Is» используется для сравнения двух объектных ссылок.
Если ссылки на объекты совпадают, Является вернет ИСТИНА. Если ссылки на объекты разные, Является вернет ЛОЖЬ.
Ничего
Наиболее частое использование Является Оператор предназначен для проверки того, был ли объект назначен объектной переменной.
Вы можете увидеть, как это работает, в следующей процедуре:
| 123456789101112 | Sub IsNothing ()Dim ws как рабочий лист'Установить ws = ActiveSheetЕсли ws - ничто, тоMsgBox «Не назначен»ЕщеMsgBox "Назначено"Конец, еслиКонец подписки |
Это полезно для предотвращения ошибок, вызванных тем, что объект не назначен переменной объекта.
Пересечение - это ничего
Обычно это используется с событиями изменения рабочего листа, чтобы определить, попадает ли целевой диапазон в указанный диапазон.
| 1234567 | Private Sub Worksheet_Change (значение ByVal как диапазон)Если не пересечение (цель, дальность ("a1: a10")) - это ничто, тогдаMsgBox "Пересечение"Конец, еслиКонец подписки |
Is - Сравнить объекты
Оператор Is также можно использовать для сравнения объектов.
Давайте посмотрим на пример. Здесь мы назначим два рабочих листа объектам рабочего листа rng1 и rng2, проверяя, хранят ли два объекта рабочего листа один и тот же рабочий лист:
| 12345678910111213 | Sub CompareObjects ()Dim ws1 как рабочий лист, ws2 как рабочий листУстановить ws1 = Sheets ("Sheet1")Установить ws2 = Sheets ("Sheet2")Если ws1 Is ws2, тоMsgBox "Тот же WS"ЕщеMsgBox «Различные WS»Конец, еслиКонец подписки |
Конечно, объекты рабочего листа не совпадают, поэтому возвращается «Различные WS».
