вызвать макрос, нажав на объединенный диапазон

239
ju33ernaut
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Selection.Count = 1 Then If Not Intersect(Target, Range(abc)) Is Nothing Then Call MyMacro End If  End If End Sub 

этот код работает нормально, когда я, например, помещаю диапазон («A1»), так что нажатие на A1 запускает макрос, теперь у меня есть объединенный диапазон W20: Z20, я обозначил диапазон как ABC, теперь, когда я возвращаюсь к своему листу, попытаться щелкнуть по ячейке, она выдает ошибку «ошибка компиляции, переменная не определена»

0
Используйте `Range (" abc ")` Máté Juhász 6 лет назад 2

1 ответ на вопрос

1
wizlog

Добро пожаловать в суперпользователя.

Как сказал Мате Юхас, если вы поставите «abc» If Not Intersect(Target, Range(abc)) Is Nothing Thenв кавычки, ваш код должен работать.

Эта строка вашего кода будет выглядеть так:

If Not Intersect(Target, Range("abc")) Is Nothing Then

Похожие вопросы