Recherche de valeurs dans plages nommées

Bonjour,

Je suis débutante en VBA et doit effectuer la macro suivante:

"Ecrivez une macro VerifValeur qui recherche une valeur dans une plage nommée.

La macro prendra deux arguments en paramètre :
valeur, représentant la valeur cherchée
zone, représentant le nom de la zone nommée dans laquelle se fera la recherche

La macro aura donc pour entête : Sub VerifValeur(valeur,zone)

Vous utiliserez la macro TestVerif pour tester votre macro"

Voilà ce que j'ai réussi à faire jusque là... évidemment ça ne fonctionne pas encore mais je bloque depuis un certain temps déjà! à l'aide!
Il y a trois plages nommées en tout (UE, ESA et CE)

---------------------
Sub VerifValeur(valeur, zone)

Trouvé = False
Dim zone As Range

For Each cellule In zone
If cellule.Value = valeur Then
Debug.Print "la valeur" + valeur + "existe"
Trouvé = True
End If

Next
If Trouvé = False Then
Debug.Print "la valeur n'existe pas"
End If

End Sub
------------------------
Sub TestVerif()
VerifValeur "France", "UE"
VerifValeur "France", "ESA"
VerifValeur "France", "CE"
VerifValeur "Allemagne", "UE"
VerifValeur "Allemagne", "ESA"
VerifValeur "Allemagne", "CE"
VerifValeur "Pologne", "UE"
VerifValeur "Pologne", "ESA"
VerifValeur "Pologne", "CE"
VerifValeur "Monaco", "UE"
VerifValeur "Monaco", "ESA"
VerifValeur "Monaco", "CE"
End Sub
---------------------------

Merci d'avance!

Clémentine