Menus déroulants/filtre/page de données et menus différent

Bonjour à tous!

Je suis de retour avec une nouvelle difficulté.

J'ai un classeur avec deux feuilles.
Sur la feuille 1 est placée l'ensemble des données (7 colonnes sur environ 1500 lignes)

J'aimerais appliquer un filtre à partir de menus déroulants placés sur la feuille 2.

J'ai commencé à travailler sur la première colonne de la feuille1.

Voici le code que j'ai plus ou moins bidouillé et qui ne marche pas:

Sub Filtre()

Sheets("feuil1").AutoFilterMode = False

If Target.Adress = "$E$7" Then
'Sachant que je veux voir apparaitre le menu déroulant dans cette cellule E7 appartenant à la feuille 2
Dim Ligne As Long
Dim Critere As String
Ligne = Sheets("feuil1").Cells(Rows.Count, 1).End(xlUp).Row
Reference = Target.Value

Sheets("feuil1").Range("$A$2:$A" & Ligne).AutoFilter Field:=1, Criteria1:=Reference



End Sub

Merci à tous