macro pour afficher/cacher une forme en fonction d'une valeur celulle

Bonjour à tous

J'aimerais pouvoir afficher/cacher des forme en fonction du résultat d'une cellule.
Il s'agit d'un fichier d'analyse des risques et opportunités, et l'idée est de pouvoir guider l'utilisateur du fichier en fonction de ces réponses.

Quel type de flux ? (import / export)
La marchandise est elle européenne oui /non?
Quel est la zone de destination (ue/aele/autre)?

De la réponse dépend la question suivante... de ce coté tout fonctionne plutôt bien.
Afin d'être plus lisible et "user friendly " j'aimerais qu'un schéma (via des flèches issue de Insertion Forme) se dessine afin de guider l'utilisateur.

Concrètement j'aimerais que lorsque la cellule B3 affiche "Export", ma "flèche 2" apparaisse
et qu'elle disparaisse lorsque la cellule B3 affiche "Import".

J'ai fait ce bout de code qui ne fonctionne pas et j'avoue être paumé.
Sauriez vous me dire ce qui cloche ?

Sub test()
If Range("B3") = "Export" Then
ActiveSheet.Shapes("flèche2").Visible = True
End If
If Range("B3") = "Import" Then
ActiveSheet.Shapes("flèche2").Visible = False
End If
End Sub

Vous remerciant bien vivement par avace de votre aide.
Belle matinée et au plaisir de vous lire

rph