[VBA] Cacher une ligne entière

Bonjour tout le monde,

Je suis actuellement entrain de travailler sur un fichier Excel dont les données varieront avec le temps.

Je souhaiterai que certaines lignes disparaissent en fonction de deux critères précis : si l'une des cellules entre A3 et A520 détient la valeur de "0" ou rien ( "" ) alors la ligne entière doit être cachée.

Si cette valeur est autre que "0" ou rien alors elle doit de nouveau apparaître.

Les valeurs de la feuil1 varient en fonction de celle de la feuil2. C'est a dire que si je met "0" en A25 de la feuil2 alors en A25 de la feuil1 il y aura écrit 0 et c'est celle ci qui doit alors être cachée. Si je change la valeur de A25 de la feuil 2 (autre que 0 ou rien) alors la 25 ème lignes de la feuil1 doit de nouveau apparaître.

Le fichier en PJ détient déjà l'une de mes formules mais elle n'est pas complètement correct : J'ai essayé de créer un code avec les quelques connaissances que j'ai en VBA...

Est ce que quelqu'un pourrait m'aider s'il vous plait ?

Voici le code

Bonjour

Remplaces ta macro actuelle par celle-ci

Private Sub Worksheet_Activate()
Dim J As Long

  Application.ScreenUpdating = False
  Rows.Hidden = False
  For J = 3 To 520
    If Range("A" & J) = 0 Then Rows(J).Hidden = True
  Next J
End Sub

Wow je m'étais sacrément bien compliqué la vie...

Merci pour ton aide !