Определить проблему изменения строки

Question

Я пытаюсь добавить формулу в диапазон, если строки добавлены или удалены.

Я нашел код ниже, в котором идея состоит в том, чтобы назвать ячейку RowMarker и отследить ее изменения. (например, A10000 name = RowMarker, если строка изменяется, код активируется).

Определите, добавляет ли пользователь или удаляет строки > Ссылка на то, откуда я взял код.

Почему мой код ниже ничего не выполняет?

Private Sub Worksheet_Change(ByVal Target As Range)
    Static lngRow As Long
    Dim rng1 As Range
    Set rng1 = ThisWorkbook.Names("RowMarker").RefersToRange
    Debug.Print Rowmarker
    If lngRow = 0 Then
    lngRow = rng1.Row
        Exit Sub
    End If
    If rng1.Row = lngRow Then Exit Sub
    If rng1.Row < lngRow Then
        Application.EnableEvents = False
        Range("AB5").Formula = "=IF(SUM(AC15:AT15)>0,SUM(AC15:AT15),"""")"
        Application.EnableEvents = True
    Else
        Application.EnableEvents = False
        Range("AB5").Formula = "=IF(SUM(AC15:AT15)>0,SUM(AC15:AT15),"""")"
        Application.EnableEvents = True
    End If
    lngRow = rng1.Row
End Sub