Событие Excel Worksheet_Change не работает

Я пытаюсь написать макрос, в котором изменение любого столбца должно автоматически сохранять рабочий лист.

Мой лист Excel расширяется до ] G25 .

Я пробовал это, но не работает:

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Target.Worksheet.Range("G25")) Is Nothing Then
        ActiveWorkbook.Save
End Sub

Я сохранил его в ThisWorkBook .

Любая помощь приветствуется.