Автоматически скрывать строки с помощью VBA в Excel

Question

Я использую следующий код, чтобы скрыть определенные строки с помощью кнопки макросов, и это работает:

Sub Filter_Row()

    ActiveSheet.Range("$A$3:$E$200").AutoFilter Field:=5, Criteria1:="1"

End Sub

Однако я пытаюсь скрыть строки каждый раз, когда вы нажимаете на вкладку, поэтому я изменил ее следующим образом:

Private Sub Worksheet_Activate()

   ActiveSheet.Range("$A$3:$E$200").AutoFilter Field:=5, Criteria1:="1"

End Sub

С этим я получаю:

Ошибка компиляции: синтаксическая ошибка (Лист 3 5: 0)

Я очень новичок в этом (VBA и Macros), поэтому любая помощь приветствуется.

По сути, я хочу, чтобы каждый раз, когда я щелкаю по рабочему листу, он скрывал все строки, для которых значение в столбце E равно 0.