Ocultar automaticamente as linhas com o VBA no Excel

Question

Estou usando o código a seguir para ocultar determinadas linhas usando um botão Macro e funciona:

Sub Filter_Row()

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

End Sub

No entanto, estou tentando ocultar as linhas toda vez que você clica na guia, então alterei para a seguinte:

Private Sub Worksheet_Activate()

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

End Sub

Com isso eu recebo:

Compile error: Syntax error (Sheet3 5:0)

Eu sou muito novo nisso (VBA e Macros), então qualquer ajuda é apreciada.

Essencialmente, o que eu quero que aconteça é que sempre que eu clico na planilha, ele deve esconder todas as linhas para as quais o valor na coluna E é 0.