Réalisation d'un macro associée à une liste déroulante dépendant

Bonjour,
Je viens de réaliser une liste déroulante dépendante d'une autre liste déroulante.
La première correspond à des zones géographiques, la deuxième aux pays de chaque zone géographique de la 1° liste.
Je souhaiterais que lorsque je me positionne sur la cellule correspondant à la 1° liste, les informations dans la cellule correspond à la 2° liste disparaissent.
Pour cela j'ai réalisé une petite macro (PAYS)

Sub PAYS()
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Not Intersect(Target, Range("A2")) Is Nothing Then
Range("B2").Value = ""

End If
End Sub

Mais elle ne fonctionne pas.
Pourriez vous m'expliquer pourquoi. Inutile de préciser que je débute dans l'écriture d'une macro.
Je vous remercie pour les explications que vous pourrez me donner