Проверьте, является ли измененная ячейка в именованном диапазоне excel vba

Question

Мне просто нужно отслеживать изменения на рабочем листе, а не на всем рабочем листе, а только внутри именованного диапазона. Поэтому, если в какой-либо ячейке происходят какие-либо изменения, она должна проверить, происходит ли изменение в этом именованном диапазоне, и если да, то должна сделать какая-то функция.

Вот мой код

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim ir As Boolean

    ir = Application.Intersect(Target.Address, Range("bd_main"))
    If ir = True Then
        MsgBox "change"
    End If

End Sub

Но это вызывает ошибку: Type Mismatch в функции Application.Intersect для Target.Address

Что я сделал не так, что вызывает такую ​​ошибку.

Answer 1

С небольшими изменениями используйте код ниже:

Private Sub Worksheet_Change(ByVal Target As Range)

    If Not Application.Intersect(Target, Range("bd_main")) Is Nothing Then
        MsgBox "change"
    End If

End Sub